/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_emacs.idb / usr / freeware / share / emacs / 19.34 / lisp / nnml.elc.z / nnml.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6c 61 72 73 69 40 69 |piled by| larsi@i|
|00000020| 66 69 2e 75 69 6f 2e 6e | 6f 20 6f 6e 20 46 72 69 |fi.uio.n|o on Fri|
|00000030| 20 4a 75 6e 20 32 38 20 | 32 30 3a 33 34 3a 33 31 | Jun 28 |20:34:31|
|00000040| 20 31 39 39 36 0a 3b 3b | 3b 20 66 72 6f 6d 20 66 | 1996.;;|; from f|
|00000050| 69 6c 65 20 2f 67 64 2f | 67 6e 75 2f 65 6d 61 63 |ile /gd/|gnu/emac|
|00000060| 73 2f 31 39 2e 30 2f 6c | 69 73 70 2f 6e 6e 6d 6c |s/19.0/l|isp/nnml|
|00000070| 2e 65 6c 0a 3b 3b 3b 20 | 65 6d 61 63 73 20 76 65 |.el.;;; |emacs ve|
|00000080| 72 73 69 6f 6e 20 31 39 | 2e 33 31 2e 34 2e 0a 3b |rsion 19|.31.4..;|
|00000090| 3b 3b 20 62 79 74 65 63 | 6f 6d 70 20 76 65 72 73 |;; bytec|omp vers|
|000000a0| 69 6f 6e 20 46 53 46 20 | 32 2e 31 30 0a 3b 3b 3b |ion FSF |2.10.;;;|
|000000b0| 20 6f 70 74 69 6d 69 7a | 61 74 69 6f 6e 20 69 73 | optimiz|ation is|
|000000c0| 20 6f 6e 2e 0a 3b 3b 3b | 20 74 68 69 73 20 66 69 | on..;;;| this fi|
|000000d0| 6c 65 20 75 73 65 73 20 | 6f 70 63 6f 64 65 73 20 |le uses |opcodes |
|000000e0| 77 68 69 63 68 20 64 6f | 20 6e 6f 74 20 65 78 69 |which do| not exi|
|000000f0| 73 74 20 69 6e 20 45 6d | 61 63 73 20 31 38 2e 0a |st in Em|acs 18..|
|00000100| 0a 28 69 66 20 28 61 6e | 64 20 28 62 6f 75 6e 64 |.(if (an|d (bound|
|00000110| 70 20 27 65 6d 61 63 73 | 2d 76 65 72 73 69 6f 6e |p 'emacs|-version|
|00000120| 29 0a 09 20 28 6f 72 20 | 28 61 6e 64 20 28 62 6f |).. (or |(and (bo|
|00000130| 75 6e 64 70 20 27 65 70 | 6f 63 68 3a 3a 76 65 72 |undp 'ep|och::ver|
|00000140| 73 69 6f 6e 29 20 65 70 | 6f 63 68 3a 3a 76 65 72 |sion) ep|och::ver|
|00000150| 73 69 6f 6e 29 0a 09 20 | 20 20 20 20 28 73 74 72 |sion).. |    (str|
|00000160| 69 6e 67 2d 6c 65 73 73 | 70 20 65 6d 61 63 73 2d |ing-less|p emacs-|
|00000170| 76 65 72 73 69 6f 6e 20 | 22 31 39 2e 32 39 22 29 |version |"19.29")|
|00000180| 29 29 0a 20 20 20 20 28 | 65 72 72 6f 72 20 22 60 |)).    (|error "`|
|00000190| 6e 6e 6d 6c 2e 65 6c 27 | 20 77 61 73 20 63 6f 6d |nnml.el'| was com|
|000001a0| 70 69 6c 65 64 20 66 6f | 72 20 45 6d 61 63 73 20 |piled fo|r Emacs |
|000001b0| 31 39 2e 32 39 20 6f 72 | 20 6c 61 74 65 72 22 29 |19.29 or| later")|
|000001c0| 29 0a 0a 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |)...(byt|e-code "|
|000001d0| c0 c1 21 88 c0 c2 21 88 | c0 c3 21 88 c0 c4 21 88 |..!...!.|..!...!.|
|000001e0| c5 c6 c7 c8 5c 22 c8 89 | 46 0e 09 42 16 09 c8 87 |....\"..|F..B....|
|000001f0| 22 20 5b 72 65 71 75 69 | 72 65 20 6e 6e 68 65 61 |" [requi|re nnhea|
|00000200| 64 65 72 20 6e 6e 6d 61 | 69 6c 20 6e 6e 6f 6f 20 |der nnma|il nnoo |
|00000210| 63 6c 20 6e 6e 6d 6c 20 | 6d 61 70 63 61 72 20 23 |cl nnml |mapcar #|
|00000220| 5b 28 70 29 20 22 08 43 | 87 22 20 5b 70 5d 20 31 |[(p) ".C|." [p] 1|
|00000230| 5d 20 6e 69 6c 20 6e 6e | 6f 6f 2d 64 65 66 69 6e |] nil nn|oo-defin|
|00000240| 69 74 69 6f 6e 2d 61 6c | 69 73 74 5d 20 34 29 0a |ition-al|ist] 4).|
|00000250| 23 40 32 33 20 4d 61 69 | 6c 20 73 70 6f 6f 6c 20 |#@23 Mai|l spool |
|00000260| 64 69 72 65 63 74 6f 72 | 79 2e 1f 0a 28 64 65 66 |director|y...(def|
|00000270| 76 61 72 20 6e 6e 6d 6c | 2d 64 69 72 65 63 74 6f |var nnml|-directo|
|00000280| 72 79 20 6d 65 73 73 61 | 67 65 2d 64 69 72 65 63 |ry messa|ge-direc|
|00000290| 74 6f 72 79 20 28 23 24 | 20 2e 20 35 39 37 29 29 |tory (#$| . 597))|
|000002a0| 0a 28 6e 6e 6f 6f 2d 64 | 65 66 69 6e 65 20 28 71 |.(nnoo-d|efine (q|
|000002b0| 75 6f 74 65 20 6e 6e 6d | 6c 2d 64 69 72 65 63 74 |uote nnm|l-direct|
|000002c0| 6f 72 79 29 20 6e 69 6c | 29 0a 23 40 31 39 20 4d |ory) nil|).#@19 M|
|000002d0| 61 69 6c 20 61 63 74 69 | 76 65 20 66 69 6c 65 2e |ail acti|ve file.|
|000002e0| 1f 0a 28 64 65 66 76 61 | 72 20 6e 6e 6d 6c 2d 61 |..(defva|r nnml-a|
|000002f0| 63 74 69 76 65 2d 66 69 | 6c 65 20 28 62 79 74 65 |ctive-fi|le (byte|
|00000300| 2d 63 6f 64 65 20 22 c0 | 09 21 c2 50 87 22 20 5b |-code ".|.!.P." [|
|00000310| 66 69 6c 65 2d 6e 61 6d | 65 2d 61 73 2d 64 69 72 |file-nam|e-as-dir|
|00000320| 65 63 74 6f 72 79 20 6e | 6e 6d 6c 2d 64 69 72 65 |ectory n|nml-dire|
|00000330| 63 74 6f 72 79 20 22 61 | 63 74 69 76 65 22 5d 20 |ctory "a|ctive"] |
|00000340| 32 29 20 28 23 24 20 2e | 20 37 31 39 29 29 0a 28 |2) (#$ .| 719)).(|
|00000350| 6e 6e 6f 6f 2d 64 65 66 | 69 6e 65 20 28 71 75 6f |nnoo-def|ine (quo|
|00000360| 74 65 20 6e 6e 6d 6c 2d | 61 63 74 69 76 65 2d 66 |te nnml-|active-f|
|00000370| 69 6c 65 29 20 6e 69 6c | 29 0a 23 40 33 35 20 4d |ile) nil|).#@35 M|
|00000380| 61 69 6c 20 6e 65 77 73 | 67 72 6f 75 70 73 20 64 |ail news|groups d|
|00000390| 65 73 63 72 69 70 74 69 | 6f 6e 20 66 69 6c 65 2e |escripti|on file.|
|000003a0| 1f 0a 28 64 65 66 76 61 | 72 20 6e 6e 6d 6c 2d 6e |..(defva|r nnml-n|
|000003b0| 65 77 73 67 72 6f 75 70 | 73 2d 66 69 6c 65 20 28 |ewsgroup|s-file (|
|000003c0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 09 21 c2 50 |byte-cod|e "..!.P|
|000003d0| 87 22 20 5b 66 69 6c 65 | 2d 6e 61 6d 65 2d 61 73 |." [file|-name-as|
|000003e0| 2d 64 69 72 65 63 74 6f | 72 79 20 6e 6e 6d 6c 2d |-directo|ry nnml-|
|000003f0| 64 69 72 65 63 74 6f 72 | 79 20 22 6e 65 77 73 67 |director|y "newsg|
|00000400| 72 6f 75 70 73 22 5d 20 | 32 29 20 28 23 24 20 2e |roups"] |2) (#$ .|
|00000410| 20 38 39 35 29 29 0a 28 | 6e 6e 6f 6f 2d 64 65 66 | 895)).(|nnoo-def|
|00000420| 69 6e 65 20 28 71 75 6f | 74 65 20 6e 6e 6d 6c 2d |ine (quo|te nnml-|
|00000430| 6e 65 77 73 67 72 6f 75 | 70 73 2d 66 69 6c 65 29 |newsgrou|ps-file)|
|00000440| 20 6e 69 6c 29 0a 23 40 | 37 32 20 49 66 20 6e 6f | nil).#@|72 If no|
|00000450| 6e 2d 6e 69 6c 2c 20 6e | 6e 6d 6c 20 77 69 6c 6c |n-nil, n|nml will|
|00000460| 20 63 68 65 63 6b 20 74 | 68 65 20 69 6e 63 6f 6d | check t|he incom|
|00000470| 69 6e 67 20 6d 61 69 6c | 20 66 69 6c 65 20 61 6e |ing mail| file an|
|00000480| 64 20 73 70 6c 69 74 20 | 74 68 65 20 6d 61 69 6c |d split |the mail|
|00000490| 2e 1f 0a 28 64 65 66 76 | 61 72 20 6e 6e 6d 6c 2d |...(defv|ar nnml-|
|000004a0| 67 65 74 2d 6e 65 77 2d | 6d 61 69 6c 20 74 20 28 |get-new-|mail t (|
|000004b0| 23 24 20 2e 20 31 30 39 | 39 29 29 0a 28 6e 6e 6f |#$ . 109|9)).(nno|
|000004c0| 6f 2d 64 65 66 69 6e 65 | 20 28 71 75 6f 74 65 20 |o-define| (quote |
|000004d0| 6e 6e 6d 6c 2d 67 65 74 | 2d 6e 65 77 2d 6d 61 69 |nnml-get|-new-mai|
|000004e0| 6c 29 20 6e 69 6c 29 0a | 23 40 34 35 31 20 49 66 |l) nil).|#@451 If|
|000004f0| 20 6e 6f 6e 2d 6e 69 6c | 2c 20 47 6e 75 73 20 77 | non-nil|, Gnus w|
|00000500| 69 6c 6c 20 6e 65 76 65 | 72 20 67 65 6e 65 72 61 |ill neve|r genera|
|00000510| 74 65 20 61 6e 64 20 75 | 73 65 20 6e 6f 76 20 64 |te and u|se nov d|
|00000520| 61 74 61 62 61 73 65 73 | 20 66 6f 72 20 6d 61 69 |atabases| for mai|
|00000530| 6c 20 67 72 6f 75 70 73 | 2e 0a 55 73 69 6e 67 20 |l groups|..Using |
|00000540| 6e 6f 76 20 64 61 74 61 | 62 61 73 65 73 20 77 69 |nov data|bases wi|
|00000550| 6c 6c 20 73 70 65 65 64 | 20 75 70 20 68 65 61 64 |ll speed| up head|
|00000560| 65 72 20 66 65 74 63 68 | 69 6e 67 20 63 6f 6e 73 |er fetch|ing cons|
|00000570| 69 64 65 72 61 62 6c 79 | 2e 0a 54 68 69 73 20 76 |iderably|..This v|
|00000580| 61 72 69 61 62 6c 65 20 | 73 68 6f 75 6c 64 6e 27 |ariable |shouldn'|
|00000590| 74 20 62 65 20 66 6c 69 | 70 70 65 64 20 6d 75 63 |t be fli|pped muc|
|000005a0| 68 2e 20 49 66 20 79 6f | 75 20 68 61 76 65 2c 20 |h. If yo|u have, |
|000005b0| 66 6f 72 20 73 6f 6d 65 | 20 72 65 61 73 6f 6e 2c |for some| reason,|
|000005c0| 0a 73 65 74 20 74 68 69 | 73 20 74 6f 20 74 2c 20 |.set thi|s to t, |
|000005d0| 61 6e 64 20 77 61 6e 74 | 20 74 6f 20 73 65 74 20 |and want| to set |
|000005e0| 69 74 20 74 6f 20 6e 69 | 6c 20 61 67 61 69 6e 2c |it to ni|l again,|
|000005f0| 20 79 6f 75 20 73 68 6f | 75 6c 64 20 61 6c 77 61 | you sho|uld alwa|
|00000600| 79 73 20 72 75 6e 0a 74 | 68 65 20 60 6e 6e 6d 6c |ys run.t|he `nnml|
|00000610| 2d 67 65 6e 65 72 61 74 | 65 2d 6e 6f 76 2d 64 61 |-generat|e-nov-da|
|00000620| 74 61 62 61 73 65 73 27 | 20 63 6f 6d 6d 61 6e 64 |tabases'| command|
|00000630| 2e 20 54 68 65 20 66 75 | 6e 63 74 69 6f 6e 20 77 |. The fu|nction w|
|00000640| 69 6c 6c 20 67 6f 0a 74 | 68 72 6f 75 67 68 20 61 |ill go.t|hrough a|
|00000650| 6c 6c 20 6e 6e 6d 6c 20 | 64 69 72 65 63 74 6f 72 |ll nnml |director|
|00000660| 69 65 73 20 61 6e 64 20 | 67 65 6e 65 72 61 74 65 |ies and |generate|
|00000670| 20 6e 6f 76 20 64 61 74 | 61 62 61 73 65 73 20 66 | nov dat|abases f|
|00000680| 6f 72 20 74 68 65 6d 0a | 61 6c 6c 2e 20 54 68 69 |or them.|all. Thi|
|00000690| 73 20 6d 61 79 20 76 65 | 72 79 20 77 65 6c 6c 20 |s may ve|ry well |
|000006a0| 74 61 6b 65 20 73 6f 6d | 65 20 74 69 6d 65 2e 1f |take som|e time..|
|000006b0| 0a 28 64 65 66 76 61 72 | 20 6e 6e 6d 6c 2d 6e 6f |.(defvar| nnml-no|
|000006c0| 76 2d 69 73 2d 65 76 69 | 6c 20 6e 69 6c 20 28 23 |v-is-evi|l nil (#|
|000006d0| 24 20 2e 20 31 32 36 32 | 29 29 0a 28 6e 6e 6f 6f |$ . 1262|)).(nnoo|
|000006e0| 2d 64 65 66 69 6e 65 20 | 28 71 75 6f 74 65 20 6e |-define |(quote n|
|000006f0| 6e 6d 6c 2d 6e 6f 76 2d | 69 73 2d 65 76 69 6c 29 |nml-nov-|is-evil)|
|00000700| 20 6e 69 6c 29 0a 23 40 | 34 38 20 48 6f 6f 6b 20 | nil).#@|48 Hook |
|00000710| 72 75 6e 20 6e 61 72 72 | 6f 77 65 64 20 74 6f 20 |run narr|owed to |
|00000720| 61 6e 20 61 72 74 69 63 | 6c 65 20 62 65 66 6f 72 |an artic|le befor|
|00000730| 65 20 73 61 76 69 6e 67 | 2e 1f 0a 28 64 65 66 76 |e saving|...(defv|
|00000740| 61 72 20 6e 6e 6d 6c 2d | 70 72 65 70 61 72 65 2d |ar nnml-|prepare-|
|00000750| 73 61 76 65 2d 6d 61 69 | 6c 2d 68 6f 6f 6b 20 6e |save-mai|l-hook n|
|00000760| 69 6c 20 28 23 24 20 2e | 20 31 38 30 33 29 29 0a |il (#$ .| 1803)).|
|00000770| 28 6e 6e 6f 6f 2d 64 65 | 66 69 6e 65 20 28 71 75 |(nnoo-de|fine (qu|
|00000780| 6f 74 65 20 6e 6e 6d 6c | 2d 70 72 65 70 61 72 65 |ote nnml|-prepare|
|00000790| 2d 73 61 76 65 2d 6d 61 | 69 6c 2d 68 6f 6f 6b 29 |-save-ma|il-hook)|
|000007a0| 20 6e 69 6c 29 0a 23 40 | 32 39 20 49 66 20 6e 6f | nil).#@|29 If no|
|000007b0| 6e 2d 6e 69 6c 2c 20 69 | 6e 68 69 62 69 74 20 65 |n-nil, i|nhibit e|
|000007c0| 78 70 69 72 79 2e 1f 0a | 28 64 65 66 76 61 72 20 |xpiry...|(defvar |
|000007d0| 6e 6e 6d 6c 2d 69 6e 68 | 69 62 69 74 2d 65 78 70 |nnml-inh|ibit-exp|
|000007e0| 69 72 79 20 6e 69 6c 20 | 28 23 24 20 2e 20 31 39 |iry nil |(#$ . 19|
|000007f0| 36 33 29 29 0a 28 6e 6e | 6f 6f 2d 64 65 66 69 6e |63)).(nn|oo-defin|
|00000800| 65 20 28 71 75 6f 74 65 | 20 6e 6e 6d 6c 2d 69 6e |e (quote| nnml-in|
|00000810| 68 69 62 69 74 2d 65 78 | 70 69 72 79 29 20 6e 69 |hibit-ex|piry) ni|
|00000820| 6c 29 0a 23 40 31 35 20 | 6e 6e 6d 6c 20 76 65 72 |l).#@15 |nnml ver|
|00000830| 73 69 6f 6e 2e 1f 0a 28 | 64 65 66 63 6f 6e 73 74 |sion...(|defconst|
|00000840| 20 6e 6e 6d 6c 2d 76 65 | 72 73 69 6f 6e 20 22 6e | nnml-ve|rsion "n|
|00000850| 6e 6d 6c 20 31 2e 30 22 | 20 28 23 24 20 2e 20 32 |nml 1.0"| (#$ . 2|
|00000860| 30 38 38 29 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |088)).(b|yte-code|
|00000870| 20 22 c0 c1 21 84 08 00 | c2 11 c1 0b 42 13 c4 c1 | "..!...|....B...|
|00000880| c5 5c 22 88 c0 c6 21 84 | 1a 00 c5 16 06 c6 0b 42 |.\"...!.|.......B|
|00000890| 13 c4 c6 c5 5c 22 88 c0 | c7 21 84 2c 00 c5 16 07 |....\"..|.!.,....|
|000008a0| c7 0b 42 13 c4 c7 c5 5c | 22 88 c0 c8 21 84 3e 00 |..B....\|"...!.>.|
|000008b0| c9 16 08 c8 0b 42 13 c4 | c8 c5 5c 22 88 c0 ca 21 |.....B..|..\"...!|
|000008c0| 84 50 00 c5 16 5c 6e ca | 0b 42 13 c4 ca c5 5c 22 |.P...\n.|.B....\"|
|000008d0| 88 c0 cb 21 84 62 00 c5 | 16 0b cb 0b 42 13 c4 cb |...!.b..|....B...|
|000008e0| c5 5c 22 88 c0 cc 21 84 | 74 00 c5 16 5c 66 cc 0b |.\"...!.|t...\f..|
|000008f0| 42 13 c4 cc c5 5c 22 88 | c0 cd 21 84 86 00 c5 16 |B....\".|..!.....|
|00000900| 0d cd 0b 42 13 c4 cd c5 | 5c 22 88 c0 ce 21 84 98 |...B....|\"...!..|
|00000910| 00 cf 16 0e ce 0b 42 13 | c4 ce c5 5c 22 88 d0 d1 |......B.|...\"...|
|00000920| 21 87 22 20 5b 62 6f 75 | 6e 64 70 20 6e 6e 6d 6c |!." [bou|ndp nnml|
|00000930| 2d 6e 6f 76 2d 66 69 6c | 65 2d 6e 61 6d 65 20 22 |-nov-fil|e-name "|
|00000940| 2e 6f 76 65 72 76 69 65 | 77 22 20 63 75 72 72 65 |.overvie|w" curre|
|00000950| 6e 74 2d 6c 6f 61 64 2d | 6c 69 73 74 20 6e 6e 6f |nt-load-|list nno|
|00000960| 6f 2d 64 65 66 69 6e 65 | 20 6e 69 6c 20 6e 6e 6d |o-define| nil nnm|
|00000970| 6c 2d 63 75 72 72 65 6e | 74 2d 64 69 72 65 63 74 |l-curren|t-direct|
|00000980| 6f 72 79 20 6e 6e 6d 6c | 2d 63 75 72 72 65 6e 74 |ory nnml|-current|
|00000990| 2d 67 72 6f 75 70 20 6e | 6e 6d 6c 2d 73 74 61 74 |-group n|nml-stat|
|000009a0| 75 73 2d 73 74 72 69 6e | 67 20 22 22 20 6e 6e 6d |us-strin|g "" nnm|
|000009b0| 6c 2d 6e 6f 76 2d 62 75 | 66 66 65 72 2d 61 6c 69 |l-nov-bu|ffer-ali|
|000009c0| 73 74 20 6e 6e 6d 6c 2d | 67 72 6f 75 70 2d 61 6c |st nnml-|group-al|
|000009d0| 69 73 74 20 6e 6e 6d 6c | 2d 61 63 74 69 76 65 2d |ist nnml|-active-|
|000009e0| 74 69 6d 65 73 74 61 6d | 70 20 6e 6e 6d 6c 2d 61 |timestam|p nnml-a|
|000009f0| 72 74 69 63 6c 65 2d 66 | 69 6c 65 2d 61 6c 69 73 |rticle-f|ile-alis|
|00000a00| 74 20 6e 6e 6d 6c 2d 67 | 65 6e 65 72 61 74 65 2d |t nnml-g|enerate-|
|00000a10| 61 63 74 69 76 65 2d 66 | 75 6e 63 74 69 6f 6e 20 |active-f|unction |
|00000a20| 6e 6e 6d 6c 2d 67 65 6e | 65 72 61 74 65 2d 61 63 |nnml-gen|erate-ac|
|00000a30| 74 69 76 65 2d 69 6e 66 | 6f 20 6e 6e 6f 6f 2d 64 |tive-inf|o nnoo-d|
|00000a40| 65 66 69 6e 65 2d 62 61 | 73 69 63 73 2d 31 20 6e |efine-ba|sics-1 n|
|00000a50| 6e 6d 6c 5d 20 33 29 0a | 28 64 65 66 61 6c 69 61 |nml] 3).|(defalia|
|00000a60| 73 20 27 6e 6e 6d 6c 2d | 72 65 74 72 69 65 76 65 |s 'nnml-|retrieve|
|00000a70| 2d 68 65 61 64 65 72 73 | 20 23 5b 28 73 65 71 75 |-headers| #[(sequ|
|00000a80| 65 6e 63 65 20 26 6f 70 | 74 69 6f 6e 61 6c 20 6e |ence &op|tional n|
|00000a90| 65 77 73 67 72 6f 75 70 | 20 73 65 72 76 65 72 20 |ewsgroup| server |
|00000aa0| 66 65 74 63 68 2d 6f 6c | 64 29 20 22 8a 08 71 88 |fetch-ol|d) "..q.|
|00000ab0| c1 20 88 c2 0b 47 c4 c2 | 89 1d 1e 06 1e 07 1e 08 |. ...G..|........|
|00000ac0| 1e 09 0b 40 3b 83 20 00 | ca 82 d3 00 cb 0e 5c 66 |...@;. .|......\f|
|00000ad0| 0e 0d 5c 22 88 0e 0e 84 | 32 00 cf 0e 10 21 16 0e |..\"....|2....!..|
|00000ae0| d1 0b 0e 12 5c 22 83 3e | 00 d3 82 d3 00 0b 83 bc |....\".>|........|
|00000af0| 00 0b 40 15 0e 10 0d 0e | 0e 9e 41 86 50 00 d4 50 |..@.....|..A.P..P|
|00000b00| 16 09 d5 0e 09 21 83 8e | 00 d6 0e 09 21 84 8e 00 |.....!..|....!...|
|00000b10| d7 d8 0d 5c 22 63 88 60 | 16 06 d9 0e 09 21 88 0e |...\"c.`|.....!..|
|00000b20| 06 62 88 da db c2 dc 23 | 83 81 00 dd 75 88 82 87 |.b.....#|....u...|
|00000b30| 00 64 62 88 db 63 88 de | 63 88 60 64 7c 88 0b 41 |.db..c..|c.`d|..A|
|00000b40| 13 0e 07 54 16 07 0e 1f | a7 83 3e 00 0e 08 0e 1f |...T....|..>.....|
|00000b50| 56 83 3e 00 0e 07 e0 a6 | c4 55 83 3e 00 e1 e2 e3 |V.>.....|.U.>....|
|00000b60| 0e 07 e4 5f 0e 08 a5 23 | 88 82 3e 00 0e 1f a7 83 |..._...#|..>.....|
|00000b70| cf 00 0e 08 0e 1f 56 83 | cf 00 e1 e2 e5 5c 22 88 |......V.|.....\".|
|00000b80| e6 20 88 ca 2e 06 87 22 | 20 5b 6e 6e 74 70 2d 73 |. ....."| [nntp-s|
|00000b90| 65 72 76 65 72 2d 62 75 | 66 66 65 72 20 65 72 61 |erver-bu|ffer era|
|00000ba0| 73 65 2d 62 75 66 66 65 | 72 20 6e 69 6c 20 73 65 |se-buffe|r nil se|
|00000bb0| 71 75 65 6e 63 65 20 30 | 20 61 72 74 69 63 6c 65 |quence 0| article|
|00000bc0| 20 62 65 67 20 63 6f 75 | 6e 74 20 6e 75 6d 62 65 | beg cou|nt numbe|
|00000bd0| 72 20 66 69 6c 65 20 68 | 65 61 64 65 72 73 20 6e |r file h|eaders n|
|00000be0| 6e 6d 6c 2d 70 6f 73 73 | 69 62 6c 79 2d 63 68 61 |nml-poss|ibly-cha|
|00000bf0| 6e 67 65 2d 64 69 72 65 | 63 74 6f 72 79 20 6e 65 |nge-dire|ctory ne|
|00000c00| 77 73 67 72 6f 75 70 20 | 73 65 72 76 65 72 20 6e |wsgroup |server n|
|00000c10| 6e 6d 6c 2d 61 72 74 69 | 63 6c 65 2d 66 69 6c 65 |nml-arti|cle-file|
|00000c20| 2d 61 6c 69 73 74 20 6e | 6e 68 65 61 64 65 72 2d |-alist n|nheader-|
|00000c30| 61 72 74 69 63 6c 65 2d | 74 6f 2d 66 69 6c 65 2d |article-|to-file-|
|00000c40| 61 6c 69 73 74 20 6e 6e | 6d 6c 2d 63 75 72 72 65 |alist nn|ml-curre|
|00000c50| 6e 74 2d 64 69 72 65 63 | 74 6f 72 79 20 6e 6e 6d |nt-direc|tory nnm|
|00000c60| 6c 2d 72 65 74 72 69 65 | 76 65 2d 68 65 61 64 65 |l-retrie|ve-heade|
|00000c70| 72 73 2d 77 69 74 68 2d | 6e 6f 76 20 66 65 74 63 |rs-with-|nov fetc|
|00000c80| 68 2d 6f 6c 64 20 6e 6f | 76 20 22 22 20 66 69 6c |h-old no|v "" fil|
|00000c90| 65 2d 65 78 69 73 74 73 | 2d 70 20 66 69 6c 65 2d |e-exists|-p file-|
|00000ca0| 64 69 72 65 63 74 6f 72 | 79 2d 70 20 66 6f 72 6d |director|y-p form|
|00000cb0| 61 74 20 22 32 32 31 20 | 25 64 20 41 72 74 69 63 |at "221 |%d Artic|
|00000cc0| 6c 65 20 72 65 74 72 69 | 65 76 65 64 2e 5c 6e 22 |le retri|eved.\n"|
|00000cd0| 20 6e 6e 68 65 61 64 65 | 72 2d 69 6e 73 65 72 74 | nnheade|r-insert|
|00000ce0| 2d 68 65 61 64 20 73 65 | 61 72 63 68 2d 66 6f 72 |-head se|arch-for|
|00000cf0| 77 61 72 64 20 22 5c 6e | 5c 6e 22 20 74 20 2d 31 |ward "\n|\n" t -1|
|00000d00| 20 22 2e 5c 6e 22 20 6e | 6e 6d 61 69 6c 2d 6c 61 | ".\n" n|nmail-la|
|00000d10| 72 67 65 2d 6e 65 77 73 | 67 72 6f 75 70 20 32 30 |rge-news|group 20|
|00000d20| 20 6e 6e 68 65 61 64 65 | 72 2d 6d 65 73 73 61 67 | nnheade|r-messag|
|00000d30| 65 20 36 20 22 6e 6e 6d | 6c 3a 20 52 65 63 65 69 |e 6 "nnm|l: Recei|
|00000d40| 76 69 6e 67 20 68 65 61 | 64 65 72 73 2e 2e 2e 20 |ving hea|ders... |
|00000d50| 25 64 25 25 22 20 31 30 | 30 20 22 6e 6e 6d 6c 3a |%d%%" 10|0 "nnml:|
|00000d60| 20 52 65 63 65 69 76 69 | 6e 67 20 68 65 61 64 65 | Receivi|ng heade|
|00000d70| 72 73 2e 2e 2e 64 6f 6e | 65 22 20 6e 6e 68 65 61 |rs...don|e" nnhea|
|00000d80| 64 65 72 2d 66 6f 6c 64 | 2d 63 6f 6e 74 69 6e 75 |der-fold|-continu|
|00000d90| 61 74 69 6f 6e 2d 6c 69 | 6e 65 73 5d 20 35 5d 29 |ation-li|nes] 5])|
|00000da0| 0a 28 6e 6e 6f 6f 2d 72 | 65 67 69 73 74 65 72 2d |.(nnoo-r|egister-|
|00000db0| 66 75 6e 63 74 69 6f 6e | 20 28 71 75 6f 74 65 20 |function| (quote |
|00000dc0| 6e 6e 6d 6c 2d 72 65 74 | 72 69 65 76 65 2d 68 65 |nnml-ret|rieve-he|
|00000dd0| 61 64 65 72 73 29 29 0a | 28 64 65 66 61 6c 69 61 |aders)).|(defalia|
|00000de0| 73 20 27 6e 6e 6d 6c 2d | 6f 70 65 6e 2d 73 65 72 |s 'nnml-|open-ser|
|00000df0| 76 65 72 20 23 5b 28 73 | 65 72 76 65 72 20 26 6f |ver #[(s|erver &o|
|00000e00| 70 74 69 6f 6e 61 6c 20 | 64 65 66 73 29 20 22 c0 |ptional |defs) ".|
|00000e10| c1 5c 6e 0b 23 88 c4 0d | 21 84 11 00 c6 c7 c8 8f |.\n.#...|!.......|
|00000e20| 88 c4 0d 21 84 20 00 c9 | 20 88 ca c1 cb 0d 23 87 |...!. ..| .....#.|
|00000e30| cc cd 0d 21 21 84 31 00 | c9 20 88 ca c1 ce 0d 23 |...!!.1.|. .....#|
|00000e40| 87 ca c1 cf 5c 6e 0d 24 | 88 d0 87 22 20 5b 6e 6e |....\n.$|..." [nn|
|00000e50| 6f 6f 2d 63 68 61 6e 67 | 65 2d 73 65 72 76 65 72 |oo-chang|e-server|
|00000e60| 20 6e 6e 6d 6c 20 73 65 | 72 76 65 72 20 64 65 66 | nnml se|rver def|
|00000e70| 73 20 66 69 6c 65 2d 65 | 78 69 73 74 73 2d 70 20 |s file-e|xists-p |
|00000e80| 6e 6e 6d 6c 2d 64 69 72 | 65 63 74 6f 72 79 20 6e |nnml-dir|ectory n|
|00000e90| 69 6c 20 28 6d 61 6b 65 | 2d 64 69 72 65 63 74 6f |il (make|-directo|
|00000ea0| 72 79 20 6e 6e 6d 6c 2d | 64 69 72 65 63 74 6f 72 |ry nnml-|director|
|00000eb0| 79 20 74 29 20 28 28 65 | 72 72 6f 72 29 29 20 6e |y t) ((e|rror)) n|
|00000ec0| 6e 6d 6c 2d 63 6c 6f 73 | 65 2d 73 65 72 76 65 72 |nml-clos|e-server|
|00000ed0| 20 6e 6e 68 65 61 64 65 | 72 2d 72 65 70 6f 72 74 | nnheade|r-report|
|00000ee0| 20 22 43 6f 75 6c 64 6e | 27 74 20 63 72 65 61 74 | "Couldn|'t creat|
|00000ef0| 65 20 64 69 72 65 63 74 | 6f 72 79 3a 20 25 73 22 |e direct|ory: %s"|
|00000f00| 20 66 69 6c 65 2d 64 69 | 72 65 63 74 6f 72 79 2d | file-di|rectory-|
|00000f10| 70 20 66 69 6c 65 2d 74 | 72 75 65 6e 61 6d 65 20 |p file-t|ruename |
|00000f20| 22 4e 6f 74 20 61 20 64 | 69 72 65 63 74 6f 72 79 |"Not a d|irectory|
|00000f30| 3a 20 25 73 22 20 22 4f | 70 65 6e 65 64 20 73 65 |: %s" "O|pened se|
|00000f40| 72 76 65 72 20 25 73 20 | 75 73 69 6e 67 20 64 69 |rver %s |using di|
|00000f50| 72 65 63 74 6f 72 79 20 | 25 73 22 20 74 5d 20 35 |rectory |%s" t] 5|
|00000f60| 5d 29 0a 28 6e 6e 6f 6f | 2d 72 65 67 69 73 74 65 |]).(nnoo|-registe|
|00000f70| 72 2d 66 75 6e 63 74 69 | 6f 6e 20 28 71 75 6f 74 |r-functi|on (quot|
|00000f80| 65 20 6e 6e 6d 6c 2d 6f | 70 65 6e 2d 73 65 72 76 |e nnml-o|pen-serv|
|00000f90| 65 72 29 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |er)).(de|falias '|
|00000fa0| 6e 6e 6d 6c 2d 72 65 71 | 75 65 73 74 2d 61 72 74 |nnml-req|uest-art|
|00000fb0| 69 63 6c 65 20 23 5b 28 | 69 64 20 26 6f 70 74 69 |icle #[(|id &opti|
|00000fc0| 6f 6e 61 6c 20 6e 65 77 | 73 67 72 6f 75 70 20 73 |onal new|sgroup s|
|00000fd0| 65 72 76 65 72 20 62 75 | 66 66 65 72 29 20 22 c0 |erver bu|ffer) ".|
|00000fe0| 09 5c 6e 5c 22 88 0b 86 | 5c 6e 00 5c 66 1c c5 1e |.\n\"...|\n.\f...|
|00000ff0| 06 c5 1e 07 c5 1e 08 c5 | 1e 09 0e 5c 6e 3b 83 4b |........|...\n;.K|
|00001000| 00 cb 0e 5c 6e 21 89 16 | 09 83 69 00 0e 09 41 cc |...\n!..|..i...A.|
|00001010| cd 0e 09 40 0e 0e 5c 22 | 89 16 08 21 9e 41 89 16 |...@..\"|...!.A..|
|00001020| 06 83 69 00 0e 08 cf 0e | 09 41 21 50 16 07 82 69 |..i.....|.A!P...i|
|00001030| 00 0e 10 84 56 00 cc 0e | 11 21 16 10 0e 5c 6e 0e |....V...|.!...\n.|
|00001040| 10 9e 41 89 16 06 83 69 | 00 0e 11 0e 06 50 16 07 |..A....i|.....P..|
|00001050| 0e 07 84 77 00 d2 d3 d4 | 0e 5c 6e 23 82 b8 00 d5 |...w....|.\n#....|
|00001060| 0e 07 21 84 87 00 d2 d3 | d6 0e 07 23 82 b8 00 d7 |..!.....|...#....|
|00001070| 0e 07 21 83 97 00 d2 d3 | d8 0e 07 23 82 b8 00 8a |..!.....|...#....|
|00001080| d9 0e 07 21 29 84 a9 00 | d2 d3 da 0e 07 23 82 b8 |...!)...|.....#..|
|00001090| 00 d2 d3 db 0e 5c 6e 23 | 88 09 dc dd 0e 07 21 21 |.....\n#|......!!|
|000010a0| 42 2d 87 22 20 5b 6e 6e | 6d 6c 2d 70 6f 73 73 69 |B-." [nn|ml-possi|
|000010b0| 62 6c 79 2d 63 68 61 6e | 67 65 2d 64 69 72 65 63 |bly-chan|ge-direc|
|000010c0| 74 6f 72 79 20 6e 65 77 | 73 67 72 6f 75 70 20 73 |tory new|sgroup s|
|000010d0| 65 72 76 65 72 20 62 75 | 66 66 65 72 20 6e 6e 74 |erver bu|ffer nnt|
|000010e0| 70 2d 73 65 72 76 65 72 | 2d 62 75 66 66 65 72 20 |p-server|-buffer |
|000010f0| 6e 69 6c 20 66 69 6c 65 | 20 70 61 74 68 20 67 70 |nil file| path gp|
|00001100| 61 74 68 20 67 72 6f 75 | 70 2d 6e 75 6d 20 69 64 |ath grou|p-num id|
|00001110| 20 6e 6e 6d 6c 2d 66 69 | 6e 64 2d 67 72 6f 75 70 | nnml-fi|nd-group|
|00001120| 2d 6e 75 6d 62 65 72 20 | 6e 6e 68 65 61 64 65 72 |-number |nnheader|
|00001130| 2d 61 72 74 69 63 6c 65 | 2d 74 6f 2d 66 69 6c 65 |-article|-to-file|
|00001140| 2d 61 6c 69 73 74 20 6e | 6e 6d 61 69 6c 2d 67 72 |-alist n|nmail-gr|
|00001150| 6f 75 70 2d 70 61 74 68 | 6e 61 6d 65 20 6e 6e 6d |oup-path|name nnm|
|00001160| 6c 2d 64 69 72 65 63 74 | 6f 72 79 20 69 6e 74 2d |l-direct|ory int-|
|00001170| 74 6f 2d 73 74 72 69 6e | 67 20 6e 6e 6d 6c 2d 61 |to-strin|g nnml-a|
|00001180| 72 74 69 63 6c 65 2d 66 | 69 6c 65 2d 61 6c 69 73 |rticle-f|ile-alis|
|00001190| 74 20 6e 6e 6d 6c 2d 63 | 75 72 72 65 6e 74 2d 64 |t nnml-c|urrent-d|
|000011a0| 69 72 65 63 74 6f 72 79 | 20 6e 6e 68 65 61 64 65 |irectory| nnheade|
|000011b0| 72 2d 72 65 70 6f 72 74 | 20 6e 6e 6d 6c 20 22 4e |r-report| nnml "N|
|000011c0| 6f 20 73 75 63 68 20 61 | 72 74 69 63 6c 65 3a 20 |o such a|rticle: |
|000011d0| 25 73 22 20 66 69 6c 65 | 2d 65 78 69 73 74 73 2d |%s" file|-exists-|
|000011e0| 70 20 22 4e 6f 20 73 75 | 63 68 20 66 69 6c 65 3a |p "No su|ch file:|
|000011f0| 20 25 73 22 20 66 69 6c | 65 2d 64 69 72 65 63 74 | %s" fil|e-direct|
|00001200| 6f 72 79 2d 70 20 22 46 | 69 6c 65 20 69 73 20 61 |ory-p "F|ile is a|
|00001210| 20 64 69 72 65 63 74 6f | 72 79 3a 20 25 73 22 20 | directo|ry: %s" |
|00001220| 6e 6e 6d 61 69 6c 2d 66 | 69 6e 64 2d 66 69 6c 65 |nnmail-f|ind-file|
|00001230| 20 22 43 6f 75 6c 64 6e | 27 74 20 72 65 61 64 20 | "Couldn|'t read |
|00001240| 66 69 6c 65 3a 20 25 73 | 22 20 22 41 72 74 69 63 |file: %s|" "Artic|
|00001250| 6c 65 20 25 73 20 72 65 | 74 72 69 65 76 65 64 22 |le %s re|trieved"|
|00001260| 20 73 74 72 69 6e 67 2d | 74 6f 2d 69 6e 74 20 66 | string-|to-int f|
|00001270| 69 6c 65 2d 6e 61 6d 65 | 2d 6e 6f 6e 64 69 72 65 |ile-name|-nondire|
|00001280| 63 74 6f 72 79 5d 20 35 | 5d 29 0a 28 6e 6e 6f 6f |ctory] 5|]).(nnoo|
|00001290| 2d 72 65 67 69 73 74 65 | 72 2d 66 75 6e 63 74 69 |-registe|r-functi|
|000012a0| 6f 6e 20 28 71 75 6f 74 | 65 20 6e 6e 6d 6c 2d 72 |on (quot|e nnml-r|
|000012b0| 65 71 75 65 73 74 2d 61 | 72 74 69 63 6c 65 29 29 |equest-a|rticle))|
|000012c0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6e 6e 6d 6c |.(defali|as 'nnml|
|000012d0| 2d 72 65 71 75 65 73 74 | 2d 67 72 6f 75 70 20 23 |-request|-group #|
|000012e0| 5b 28 67 72 6f 75 70 20 | 26 6f 70 74 69 6f 6e 61 |[(group |&optiona|
|000012f0| 6c 20 73 65 72 76 65 72 | 20 64 6f 6e 74 2d 63 68 |l server| dont-ch|
|00001300| 65 63 6b 29 20 22 c0 09 | 5c 6e 5c 22 84 5c 66 00 |eck) "..|\n\".\f.|
|00001310| c3 c4 c5 5c 22 87 c6 0e | 07 21 84 1a 00 c3 c4 c8 |...\"...|.!......|
|00001320| 0e 07 23 87 0e 09 83 27 | 00 c3 c4 ca 09 23 88 cb |..#....'|.....#..|
|00001330| 87 cc c4 21 88 cd 09 0e | 0e 5c 22 41 40 89 1e 0f |...!....|.\"A@...|
|00001340| 84 40 00 c3 c4 d0 09 23 | 82 5a 00 c3 c4 d1 09 23 |.@.....#|.Z.....#|
|00001350| 88 d2 d3 0e 0f 41 0e 0f | 40 5a 54 d4 5d 0e 0f 40 |.....A..|@ZT.]..@|
|00001360| 0e 0f 41 09 25 29 87 22 | 20 5b 6e 6e 6d 6c 2d 70 |..A.%)."| [nnml-p|
|00001370| 6f 73 73 69 62 6c 79 2d | 63 68 61 6e 67 65 2d 64 |ossibly-|change-d|
|00001380| 69 72 65 63 74 6f 72 79 | 20 67 72 6f 75 70 20 73 |irectory| group s|
|00001390| 65 72 76 65 72 20 6e 6e | 68 65 61 64 65 72 2d 72 |erver nn|header-r|
|000013a0| 65 70 6f 72 74 20 6e 6e | 6d 6c 20 22 49 6e 76 61 |eport nn|ml "Inva|
|000013b0| 6c 69 64 20 67 72 6f 75 | 70 20 28 6e 6f 20 73 75 |lid grou|p (no su|
|000013c0| 63 68 20 64 69 72 65 63 | 74 6f 72 79 29 22 20 66 |ch direc|tory)" f|
|000013d0| 69 6c 65 2d 64 69 72 65 | 63 74 6f 72 79 2d 70 20 |ile-dire|ctory-p |
|000013e0| 6e 6e 6d 6c 2d 63 75 72 | 72 65 6e 74 2d 64 69 72 |nnml-cur|rent-dir|
|000013f0| 65 63 74 6f 72 79 20 22 | 25 73 20 69 73 20 6e 6f |ectory "|%s is no|
|00001400| 74 20 61 20 64 69 72 65 | 63 74 6f 72 79 22 20 64 |t a dire|ctory" d|
|00001410| 6f 6e 74 2d 63 68 65 63 | 6b 20 22 47 72 6f 75 70 |ont-chec|k "Group|
|00001420| 20 25 73 20 73 65 6c 65 | 63 74 65 64 22 20 74 20 | %s sele|cted" t |
|00001430| 6e 6e 6d 61 69 6c 2d 61 | 63 74 69 76 61 74 65 20 |nnmail-a|ctivate |
|00001440| 61 73 73 6f 63 20 6e 6e | 6d 6c 2d 67 72 6f 75 70 |assoc nn|ml-group|
|00001450| 2d 61 6c 69 73 74 20 61 | 63 74 69 76 65 20 22 4e |-alist a|ctive "N|
|00001460| 6f 20 73 75 63 68 20 67 | 72 6f 75 70 3a 20 25 73 |o such g|roup: %s|
|00001470| 22 20 22 53 65 6c 65 63 | 74 65 64 20 67 72 6f 75 |" "Selec|ted grou|
|00001480| 70 20 25 73 22 20 6e 6e | 68 65 61 64 65 72 2d 69 |p %s" nn|header-i|
|00001490| 6e 73 65 72 74 20 22 32 | 31 31 20 25 64 20 25 64 |nsert "2|11 %d %d|
|000014a0| 20 25 64 20 25 73 5c 6e | 22 20 30 5d 20 37 5d 29 | %d %s\n|" 0] 7])|
|000014b0| 0a 28 6e 6e 6f 6f 2d 72 | 65 67 69 73 74 65 72 2d |.(nnoo-r|egister-|
|000014c0| 66 75 6e 63 74 69 6f 6e | 20 28 71 75 6f 74 65 20 |function| (quote |
|000014d0| 6e 6e 6d 6c 2d 72 65 71 | 75 65 73 74 2d 67 72 6f |nnml-req|uest-gro|
|000014e0| 75 70 29 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |up)).(de|falias '|
|000014f0| 6e 6e 6d 6c 2d 72 65 71 | 75 65 73 74 2d 73 63 61 |nnml-req|uest-sca|
|00001500| 6e 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 67 |n #[(&op|tional g|
|00001510| 72 6f 75 70 20 73 65 72 | 76 65 72 29 20 22 c0 11 |roup ser|ver) "..|
|00001520| c2 c3 c4 0d 0e 06 24 87 | 22 20 5b 6e 69 6c 20 6e |......$.|" [nil n|
|00001530| 6e 6d 6c 2d 61 72 74 69 | 63 6c 65 2d 66 69 6c 65 |nml-arti|cle-file|
|00001540| 2d 61 6c 69 73 74 20 6e | 6e 6d 61 69 6c 2d 67 65 |-alist n|nmail-ge|
|00001550| 74 2d 6e 65 77 2d 6d 61 | 69 6c 20 6e 6e 6d 6c 20 |t-new-ma|il nnml |
|00001560| 6e 6e 6d 6c 2d 73 61 76 | 65 2d 6e 6f 76 20 6e 6e |nnml-sav|e-nov nn|
|00001570| 6d 6c 2d 64 69 72 65 63 | 74 6f 72 79 20 67 72 6f |ml-direc|tory gro|
|00001580| 75 70 5d 20 35 5d 29 0a | 28 6e 6e 6f 6f 2d 72 65 |up] 5]).|(nnoo-re|
|00001590| 67 69 73 74 65 72 2d 66 | 75 6e 63 74 69 6f 6e 20 |gister-f|unction |
|000015a0| 28 71 75 6f 74 65 20 6e | 6e 6d 6c 2d 72 65 71 75 |(quote n|nml-requ|
|000015b0| 65 73 74 2d 73 63 61 6e | 29 29 0a 28 64 65 66 61 |est-scan|)).(defa|
|000015c0| 6c 69 61 73 20 27 6e 6e | 6d 6c 2d 63 6c 6f 73 65 |lias 'nn|ml-close|
|000015d0| 2d 67 72 6f 75 70 20 23 | 5b 28 67 72 6f 75 70 20 |-group #|[(group |
|000015e0| 26 6f 70 74 69 6f 6e 61 | 6c 20 73 65 72 76 65 72 |&optiona|l server|
|000015f0| 29 20 22 c0 11 c2 87 22 | 20 5b 6e 69 6c 20 6e 6e |) "...."| [nil nn|
|00001600| 6d 6c 2d 61 72 74 69 63 | 6c 65 2d 66 69 6c 65 2d |ml-artic|le-file-|
|00001610| 61 6c 69 73 74 20 74 5d | 20 31 5d 29 0a 28 6e 6e |alist t]| 1]).(nn|
|00001620| 6f 6f 2d 72 65 67 69 73 | 74 65 72 2d 66 75 6e 63 |oo-regis|ter-func|
|00001630| 74 69 6f 6e 20 28 71 75 | 6f 74 65 20 6e 6e 6d 6c |tion (qu|ote nnml|
|00001640| 2d 63 6c 6f 73 65 2d 67 | 72 6f 75 70 29 29 0a 28 |-close-g|roup)).(|
|00001650| 64 65 66 61 6c 69 61 73 | 20 27 6e 6e 6d 6c 2d 72 |defalias| 'nnml-r|
|00001660| 65 71 75 65 73 74 2d 63 | 72 65 61 74 65 2d 67 72 |equest-c|reate-gr|
|00001670| 6f 75 70 20 23 5b 28 67 | 72 6f 75 70 20 26 6f 70 |oup #[(g|roup &op|
|00001680| 74 69 6f 6e 61 6c 20 73 | 65 72 76 65 72 29 20 22 |tional s|erver) "|
|00001690| c0 c1 21 88 c2 0b 5c 66 | 5c 22 84 47 00 c5 1e 06 |..!...\f|\".G....|
|000016a0| 0b c7 c8 42 89 16 06 44 | 5c 66 42 14 c9 0b 21 88 |...B...D|\fB...!.|
|000016b0| ca 0b 0e 0b 5c 22 88 cc | 0e 0d 21 89 1e 0e 83 3f |....\"..|..!....?|
|000016c0| 00 0e 06 cf d0 0e 0e 5c | 22 a0 88 0e 06 cf d1 0e |.......\|".......|
|000016d0| 0e 5c 22 a1 88 29 d2 5c | 66 0e 13 5c 22 88 29 d4 |.\"..).\|f..\".).|
|000016e0| 87 22 20 5b 6e 6e 6d 61 | 69 6c 2d 61 63 74 69 76 |." [nnma|il-activ|
|000016f0| 61 74 65 20 6e 6e 6d 6c | 20 61 73 73 6f 63 20 67 |ate nnml| assoc g|
|00001700| 72 6f 75 70 20 6e 6e 6d | 6c 2d 67 72 6f 75 70 2d |roup nnm|l-group-|
|00001710| 61 6c 69 73 74 20 6e 69 | 6c 20 61 63 74 69 76 65 |alist ni|l active|
|00001720| 20 31 20 30 20 6e 6e 6d | 6c 2d 70 6f 73 73 69 62 | 1 0 nnm|l-possib|
|00001730| 6c 79 2d 63 72 65 61 74 | 65 2d 64 69 72 65 63 74 |ly-creat|e-direct|
|00001740| 6f 72 79 20 6e 6e 6d 6c | 2d 70 6f 73 73 69 62 6c |ory nnml|-possibl|
|00001750| 79 2d 63 68 61 6e 67 65 | 2d 64 69 72 65 63 74 6f |y-change|-directo|
|00001760| 72 79 20 73 65 72 76 65 | 72 20 6e 6e 68 65 61 64 |ry serve|r nnhead|
|00001770| 65 72 2d 64 69 72 65 63 | 74 6f 72 79 2d 61 72 74 |er-direc|tory-art|
|00001780| 69 63 6c 65 73 20 6e 6e | 6d 6c 2d 63 75 72 72 65 |icles nn|ml-curre|
|00001790| 6e 74 2d 64 69 72 65 63 | 74 6f 72 79 20 61 72 74 |nt-direc|tory art|
|000017a0| 69 63 6c 65 73 20 61 70 | 70 6c 79 20 6d 69 6e 20 |icles ap|ply min |
|000017b0| 6d 61 78 20 6e 6e 6d 61 | 69 6c 2d 73 61 76 65 2d |max nnma|il-save-|
|000017c0| 61 63 74 69 76 65 20 6e | 6e 6d 6c 2d 61 63 74 69 |active n|nml-acti|
|000017d0| 76 65 2d 66 69 6c 65 20 | 74 5d 20 35 5d 29 0a 28 |ve-file |t] 5]).(|
|000017e0| 6e 6e 6f 6f 2d 72 65 67 | 69 73 74 65 72 2d 66 75 |nnoo-reg|ister-fu|
|000017f0| 6e 63 74 69 6f 6e 20 28 | 71 75 6f 74 65 20 6e 6e |nction (|quote nn|
|00001800| 6d 6c 2d 72 65 71 75 65 | 73 74 2d 63 72 65 61 74 |ml-reque|st-creat|
|00001810| 65 2d 67 72 6f 75 70 29 | 29 0a 28 64 65 66 61 6c |e-group)|).(defal|
|00001820| 69 61 73 20 27 6e 6e 6d | 6c 2d 72 65 71 75 65 73 |ias 'nnm|l-reques|
|00001830| 74 2d 6c 69 73 74 20 23 | 5b 28 26 6f 70 74 69 6f |t-list #|[(&optio|
|00001840| 6e 61 6c 20 73 65 72 76 | 65 72 29 20 22 8a c0 09 |nal serv|er) "...|
|00001850| 21 88 c2 20 89 13 29 87 | 22 20 5b 6e 6e 6d 61 69 |!.. ..).|" [nnmai|
|00001860| 6c 2d 66 69 6e 64 2d 66 | 69 6c 65 20 6e 6e 6d 6c |l-find-f|ile nnml|
|00001870| 2d 61 63 74 69 76 65 2d | 66 69 6c 65 20 6e 6e 6d |-active-|file nnm|
|00001880| 61 69 6c 2d 67 65 74 2d | 61 63 74 69 76 65 20 6e |ail-get-|active n|
|00001890| 6e 6d 6c 2d 67 72 6f 75 | 70 2d 61 6c 69 73 74 5d |nml-grou|p-alist]|
|000018a0| 20 32 5d 29 0a 28 6e 6e | 6f 6f 2d 72 65 67 69 73 | 2]).(nn|oo-regis|
|000018b0| 74 65 72 2d 66 75 6e 63 | 74 69 6f 6e 20 28 71 75 |ter-func|tion (qu|
|000018c0| 6f 74 65 20 6e 6e 6d 6c | 2d 72 65 71 75 65 73 74 |ote nnml|-request|
|000018d0| 2d 6c 69 73 74 29 29 0a | 28 64 65 66 61 6c 69 61 |-list)).|(defalia|
|000018e0| 73 20 27 6e 6e 6d 6c 2d | 72 65 71 75 65 73 74 2d |s 'nnml-|request-|
|000018f0| 6e 65 77 67 72 6f 75 70 | 73 20 23 5b 28 64 61 74 |newgroup|s #[(dat|
|00001900| 65 20 26 6f 70 74 69 6f | 6e 61 6c 20 73 65 72 76 |e &optio|nal serv|
|00001910| 65 72 29 20 22 c0 09 21 | 87 22 20 5b 6e 6e 6d 6c |er) "..!|." [nnml|
|00001920| 2d 72 65 71 75 65 73 74 | 2d 6c 69 73 74 20 73 65 |-request|-list se|
|00001930| 72 76 65 72 5d 20 32 5d | 29 0a 28 6e 6e 6f 6f 2d |rver] 2]|).(nnoo-|
|00001940| 72 65 67 69 73 74 65 72 | 2d 66 75 6e 63 74 69 6f |register|-functio|
|00001950| 6e 20 28 71 75 6f 74 65 | 20 6e 6e 6d 6c 2d 72 65 |n (quote| nnml-re|
|00001960| 71 75 65 73 74 2d 6e 65 | 77 67 72 6f 75 70 73 29 |quest-ne|wgroups)|
|00001970| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 6d |).(defal|ias 'nnm|
|00001980| 6c 2d 72 65 71 75 65 73 | 74 2d 6c 69 73 74 2d 6e |l-reques|t-list-n|
|00001990| 65 77 73 67 72 6f 75 70 | 73 20 23 5b 28 26 6f 70 |ewsgroup|s #[(&op|
|000019a0| 74 69 6f 6e 61 6c 20 73 | 65 72 76 65 72 29 20 22 |tional s|erver) "|
|000019b0| 8a c0 09 21 29 87 22 20 | 5b 6e 6e 6d 61 69 6c 2d |...!)." |[nnmail-|
|000019c0| 66 69 6e 64 2d 66 69 6c | 65 20 6e 6e 6d 6c 2d 6e |find-fil|e nnml-n|
|000019d0| 65 77 73 67 72 6f 75 70 | 73 2d 66 69 6c 65 5d 20 |ewsgroup|s-file] |
|000019e0| 32 5d 29 0a 28 6e 6e 6f | 6f 2d 72 65 67 69 73 74 |2]).(nno|o-regist|
|000019f0| 65 72 2d 66 75 6e 63 74 | 69 6f 6e 20 28 71 75 6f |er-funct|ion (quo|
|00001a00| 74 65 20 6e 6e 6d 6c 2d | 72 65 71 75 65 73 74 2d |te nnml-|request-|
|00001a10| 6c 69 73 74 2d 6e 65 77 | 73 67 72 6f 75 70 73 29 |list-new|sgroups)|
|00001a20| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 6d |).(defal|ias 'nnm|
|00001a30| 6c 2d 72 65 71 75 65 73 | 74 2d 65 78 70 69 72 65 |l-reques|t-expire|
|00001a40| 2d 61 72 74 69 63 6c 65 | 73 20 23 5b 28 61 72 74 |-article|s #[(art|
|00001a50| 69 63 6c 65 73 20 6e 65 | 77 73 67 72 6f 75 70 20 |icles ne|wsgroup |
|00001a60| 26 6f 70 74 69 6f 6e 61 | 6c 20 73 65 72 76 65 72 |&optiona|l server|
|00001a70| 20 66 6f 72 63 65 29 20 | 22 c0 09 5c 6e 5c 22 88 | force) |"..\n\".|
|00001a80| c3 5c 66 21 1d c6 1e 07 | c8 1e 09 c8 1e 5c 6e c8 |.\f!....|.....\n.|
|00001a90| 1e 0b c8 1e 5c 66 cd ce | 21 88 0e 0f 84 26 00 d0 |....\f..|!....&..|
|00001aa0| 5c 66 21 16 0f 0e 11 83 | 89 00 0e 07 83 89 00 5c |\f!.....|.......\|
|00001ab0| 66 d2 0e 11 89 41 16 11 | 40 89 16 5c 66 21 50 16 |f....A..|@..\f!P.|
|00001ac0| 09 d3 d4 0e 09 21 38 89 | 16 0b 83 26 00 d5 09 0e |.....!8.|...&....|
|00001ad0| 5c 66 5c 22 83 7f 00 d6 | 09 0e 0b 0e 17 0e 18 24 |\f\"....|.......$|
|00001ae0| 89 16 07 83 7f 00 d9 d3 | da 0e 09 09 24 88 c8 db |........|....$...|
|00001af0| dc 8f 88 dd 0e 5c 66 0d | 5c 22 15 de 09 0e 5c 66 |.....\f.|\"....\f|
|00001b00| 5c 22 88 82 26 00 0e 5c | 66 0e 5c 6e 42 16 5c 6e |\"..&..\|f.\nB.\n|
|00001b10| 82 26 00 df 09 0e 20 5c | 22 41 40 89 1e 21 83 a9 |.&.... \|"A@..!..|
|00001b20| 00 0e 21 0d 83 a3 00 e2 | e3 0d 5c 22 86 a7 00 0e |..!.....|..\"....|
|00001b30| 21 41 54 a0 88 e4 0e 20 | 0e 25 5c 22 88 29 e6 20 |!AT.... |.%\".). |
|00001b40| 88 e7 e8 21 88 0e 5c 6e | 0e 11 a4 2e 06 87 22 20 |...!..\n|......" |
|00001b50| 5b 6e 6e 6d 6c 2d 70 6f | 73 73 69 62 6c 79 2d 63 |[nnml-po|ssibly-c|
|00001b60| 68 61 6e 67 65 2d 64 69 | 72 65 63 74 6f 72 79 20 |hange-di|rectory |
|00001b70| 6e 65 77 73 67 72 6f 75 | 70 20 73 65 72 76 65 72 |newsgrou|p server|
|00001b80| 20 6e 6e 68 65 61 64 65 | 72 2d 64 69 72 65 63 74 | nnheade|r-direct|
|00001b90| 6f 72 79 2d 61 72 74 69 | 63 6c 65 73 20 6e 6e 6d |ory-arti|cles nnm|
|00001ba0| 6c 2d 63 75 72 72 65 6e | 74 2d 64 69 72 65 63 74 |l-curren|t-direct|
|00001bb0| 6f 72 79 20 61 63 74 69 | 76 65 2d 61 72 74 69 63 |ory acti|ve-artic|
|00001bc0| 6c 65 73 20 74 20 69 73 | 2d 6f 6c 64 20 6e 69 6c |les t is|-old nil|
|00001bd0| 20 61 72 74 69 63 6c 65 | 20 72 65 73 74 20 6d 6f | article| rest mo|
|00001be0| 64 2d 74 69 6d 65 20 6e | 75 6d 62 65 72 20 6e 6e |d-time n|umber nn|
|00001bf0| 6d 61 69 6c 2d 61 63 74 | 69 76 61 74 65 20 6e 6e |mail-act|ivate nn|
|00001c00| 6d 6c 20 6e 6e 6d 6c 2d | 61 72 74 69 63 6c 65 2d |ml nnml-|article-|
|00001c10| 66 69 6c 65 2d 61 6c 69 | 73 74 20 6e 6e 68 65 61 |file-ali|st nnhea|
|00001c20| 64 65 72 2d 61 72 74 69 | 63 6c 65 2d 74 6f 2d 66 |der-arti|cle-to-f|
|00001c30| 69 6c 65 2d 61 6c 69 73 | 74 20 61 72 74 69 63 6c |ile-alis|t articl|
|00001c40| 65 73 20 69 6e 74 2d 74 | 6f 2d 73 74 72 69 6e 67 |es int-t|o-string|
|00001c50| 20 35 20 66 69 6c 65 2d | 61 74 74 72 69 62 75 74 | 5 file-|attribut|
|00001c60| 65 73 20 6e 6e 6d 6c 2d | 64 65 6c 65 74 61 62 6c |es nnml-|deletabl|
|00001c70| 65 2d 61 72 74 69 63 6c | 65 2d 70 20 6e 6e 6d 61 |e-articl|e-p nnma|
|00001c80| 69 6c 2d 65 78 70 69 72 | 65 64 2d 61 72 74 69 63 |il-expir|ed-artic|
|00001c90| 6c 65 2d 70 20 66 6f 72 | 63 65 20 6e 6e 6d 6c 2d |le-p for|ce nnml-|
|00001ca0| 69 6e 68 69 62 69 74 2d | 65 78 70 69 72 79 20 6e |inhibit-|expiry n|
|00001cb0| 6e 68 65 61 64 65 72 2d | 6d 65 73 73 61 67 65 20 |nheader-|message |
|00001cc0| 22 44 65 6c 65 74 69 6e | 67 20 61 72 74 69 63 6c |"Deletin|g articl|
|00001cd0| 65 20 25 73 20 69 6e 20 | 25 73 2e 2e 2e 22 20 28 |e %s in |%s..." (|
|00001ce0| 66 75 6e 63 61 6c 6c 20 | 6e 6e 6d 61 69 6c 2d 64 |funcall |nnmail-d|
|00001cf0| 65 6c 65 74 65 2d 66 69 | 6c 65 2d 66 75 6e 63 74 |elete-fi|le-funct|
|00001d00| 69 6f 6e 20 61 72 74 69 | 63 6c 65 29 20 28 28 66 |ion arti|cle) ((f|
|00001d10| 69 6c 65 2d 65 72 72 6f | 72 20 28 62 79 74 65 2d |ile-erro|r (byte-|
|00001d20| 63 6f 64 65 20 22 08 09 | 42 11 c2 87 22 20 5b 6e |code "..|B..." [n|
|00001d30| 75 6d 62 65 72 20 72 65 | 73 74 20 6e 69 6c 5d 20 |umber re|st nil] |
|00001d40| 32 29 29 29 20 64 65 6c | 71 20 6e 6e 6d 6c 2d 6e |2))) del|q nnml-n|
|00001d50| 6f 76 2d 64 65 6c 65 74 | 65 2d 61 72 74 69 63 6c |ov-delet|e-articl|
|00001d60| 65 20 61 73 73 6f 63 20 | 6e 6e 6d 6c 2d 67 72 6f |e assoc |nnml-gro|
|00001d70| 75 70 2d 61 6c 69 73 74 | 20 61 63 74 69 76 65 20 |up-alist| active |
|00001d80| 61 70 70 6c 79 20 6d 69 | 6e 20 6e 6e 6d 61 69 6c |apply mi|n nnmail|
|00001d90| 2d 73 61 76 65 2d 61 63 | 74 69 76 65 20 6e 6e 6d |-save-ac|tive nnm|
|00001da0| 6c 2d 61 63 74 69 76 65 | 2d 66 69 6c 65 20 6e 6e |l-active|-file nn|
|00001db0| 6d 6c 2d 73 61 76 65 2d | 6e 6f 76 20 6d 65 73 73 |ml-save-|nov mess|
|00001dc0| 61 67 65 20 22 22 5d 20 | 36 5d 29 0a 28 6e 6e 6f |age ""] |6]).(nno|
|00001dd0| 6f 2d 72 65 67 69 73 74 | 65 72 2d 66 75 6e 63 74 |o-regist|er-funct|
|00001de0| 69 6f 6e 20 28 71 75 6f | 74 65 20 6e 6e 6d 6c 2d |ion (quo|te nnml-|
|00001df0| 72 65 71 75 65 73 74 2d | 65 78 70 69 72 65 2d 61 |request-|expire-a|
|00001e00| 72 74 69 63 6c 65 73 29 | 29 0a 28 64 65 66 61 6c |rticles)|).(defal|
|00001e10| 69 61 73 20 27 6e 6e 6d | 6c 2d 72 65 71 75 65 73 |ias 'nnm|l-reques|
|00001e20| 74 2d 6d 6f 76 65 2d 61 | 72 74 69 63 6c 65 20 23 |t-move-a|rticle #|
|00001e30| 5b 28 61 72 74 69 63 6c | 65 20 67 72 6f 75 70 20 |[(articl|e group |
|00001e40| 73 65 72 76 65 72 20 61 | 63 63 65 70 74 2d 66 6f |server a|ccept-fo|
|00001e50| 72 6d 20 26 6f 70 74 69 | 6f 6e 61 6c 20 6c 61 73 |rm &opti|onal las|
|00001e60| 74 29 20 22 c0 c1 21 c2 | 1b 1c c5 0e 06 0e 07 5c |t) "..!.|.......\|
|00001e70| 22 88 0e 08 84 18 00 c9 | 0e 5c 6e 21 16 08 cb 0e |".......|.\n!....|
|00001e80| 06 0e 5c 66 5c 22 83 5e | 00 cd 0e 5c 66 0e 06 0e |..\f\".^|...\f...|
|00001e90| 07 23 83 5e 00 8a 5c 66 | 71 88 ce 0e 0f 21 88 d0 |.#.^..\f|q....!..|
|00001ea0| 0e 11 21 13 d2 70 21 88 | 0b 29 83 5e 00 c5 0e 06 |..!..p!.|.).^....|
|00001eb0| 0e 07 5c 22 88 c2 d3 d4 | 8f 88 d5 0e 06 0e 5c 66 |..\"....|......\f|
|00001ec0| 5c 22 88 0e 16 83 5e 00 | d7 20 88 0b 2a 87 22 20 |\"....^.|. ..*." |
|00001ed0| 5b 67 65 74 2d 62 75 66 | 66 65 72 2d 63 72 65 61 |[get-buf|fer-crea|
|00001ee0| 74 65 20 22 20 2a 6e 6e | 6d 6c 20 6d 6f 76 65 2a |te " *nn|ml move*|
|00001ef0| 22 20 6e 69 6c 20 72 65 | 73 75 6c 74 20 62 75 66 |" nil re|sult buf|
|00001f00| 20 6e 6e 6d 6c 2d 70 6f | 73 73 69 62 6c 79 2d 63 | nnml-po|ssibly-c|
|00001f10| 68 61 6e 67 65 2d 64 69 | 72 65 63 74 6f 72 79 20 |hange-di|rectory |
|00001f20| 67 72 6f 75 70 20 73 65 | 72 76 65 72 20 6e 6e 6d |group se|rver nnm|
|00001f30| 6c 2d 61 72 74 69 63 6c | 65 2d 66 69 6c 65 2d 61 |l-articl|e-file-a|
|00001f40| 6c 69 73 74 20 6e 6e 68 | 65 61 64 65 72 2d 61 72 |list nnh|eader-ar|
|00001f50| 74 69 63 6c 65 2d 74 6f | 2d 66 69 6c 65 2d 61 6c |ticle-to|-file-al|
|00001f60| 69 73 74 20 6e 6e 6d 6c | 2d 63 75 72 72 65 6e 74 |ist nnml|-current|
|00001f70| 2d 64 69 72 65 63 74 6f | 72 79 20 6e 6e 6d 6c 2d |-directo|ry nnml-|
|00001f80| 64 65 6c 65 74 61 62 6c | 65 2d 61 72 74 69 63 6c |deletabl|e-articl|
|00001f90| 65 2d 70 20 61 72 74 69 | 63 6c 65 20 6e 6e 6d 6c |e-p arti|cle nnml|
|00001fa0| 2d 72 65 71 75 65 73 74 | 2d 61 72 74 69 63 6c 65 |-request|-article|
|00001fb0| 20 69 6e 73 65 72 74 2d | 62 75 66 66 65 72 2d 73 | insert-|buffer-s|
|00001fc0| 75 62 73 74 72 69 6e 67 | 20 6e 6e 74 70 2d 73 65 |ubstring| nntp-se|
|00001fd0| 72 76 65 72 2d 62 75 66 | 66 65 72 20 65 76 61 6c |rver-buf|fer eval|
|00001fe0| 20 61 63 63 65 70 74 2d | 66 6f 72 6d 20 6b 69 6c | accept-|form kil|
|00001ff0| 6c 2d 62 75 66 66 65 72 | 20 28 62 79 74 65 2d 63 |l-buffer| (byte-c|
|00002000| 6f 64 65 20 22 08 09 c2 | 0b 21 50 21 87 22 20 5b |ode "...|.!P!." [|
|00002010| 6e 6e 6d 61 69 6c 2d 64 | 65 6c 65 74 65 2d 66 69 |nnmail-d|elete-fi|
|00002020| 6c 65 2d 66 75 6e 63 74 | 69 6f 6e 20 6e 6e 6d 6c |le-funct|ion nnml|
|00002030| 2d 63 75 72 72 65 6e 74 | 2d 64 69 72 65 63 74 6f |-current|-directo|
|00002040| 72 79 20 69 6e 74 2d 74 | 6f 2d 73 74 72 69 6e 67 |ry int-t|o-string|
|00002050| 20 61 72 74 69 63 6c 65 | 5d 20 34 29 20 28 28 66 | article|] 4) ((f|
|00002060| 69 6c 65 2d 65 72 72 6f | 72 29 29 20 6e 6e 6d 6c |ile-erro|r)) nnml|
|00002070| 2d 6e 6f 76 2d 64 65 6c | 65 74 65 2d 61 72 74 69 |-nov-del|ete-arti|
|00002080| 63 6c 65 20 6c 61 73 74 | 20 6e 6e 6d 6c 2d 73 61 |cle last| nnml-sa|
|00002090| 76 65 2d 6e 6f 76 5d 20 | 34 5d 29 0a 28 6e 6e 6f |ve-nov] |4]).(nno|
|000020a0| 6f 2d 72 65 67 69 73 74 | 65 72 2d 66 75 6e 63 74 |o-regist|er-funct|
|000020b0| 69 6f 6e 20 28 71 75 6f | 74 65 20 6e 6e 6d 6c 2d |ion (quo|te nnml-|
|000020c0| 72 65 71 75 65 73 74 2d | 6d 6f 76 65 2d 61 72 74 |request-|move-art|
|000020d0| 69 63 6c 65 29 29 0a 28 | 64 65 66 61 6c 69 61 73 |icle)).(|defalias|
|000020e0| 20 27 6e 6e 6d 6c 2d 72 | 65 71 75 65 73 74 2d 61 | 'nnml-r|equest-a|
|000020f0| 63 63 65 70 74 2d 61 72 | 74 69 63 6c 65 20 23 5b |ccept-ar|ticle #[|
|00002100| 28 67 72 6f 75 70 20 26 | 6f 70 74 69 6f 6e 61 6c |(group &|optional|
|00002110| 20 73 65 72 76 65 72 20 | 6c 61 73 74 29 20 22 c0 | server |last) ".|
|00002120| 09 5c 6e 5c 22 88 c3 20 | 88 c4 1d 09 3b 83 36 00 |.\n\".. |....;.6.|
|00002130| c6 c7 21 83 53 00 09 c8 | 44 43 1e 09 ca 20 40 89 |..!.S...|DC... @.|
|00002140| 15 29 83 53 00 cb 0e 5c | 66 0e 0d 5c 22 88 0e 0e |.).S...\|f..\"...|
|00002150| 83 53 00 cf 20 88 82 53 | 00 c6 c7 21 83 53 00 ca |.S.. ..S|...!.S..|
|00002160| 20 40 89 15 83 53 00 cb | 0e 5c 66 0e 0d 5c 22 88 | @...S..|.\f..\".|
|00002170| 0e 0e 83 53 00 cf 20 88 | 0d 29 87 22 20 5b 6e 6e |...S.. .|.)." [nn|
|00002180| 6d 6c 2d 70 6f 73 73 69 | 62 6c 79 2d 63 68 61 6e |ml-possi|bly-chan|
|00002190| 67 65 2d 64 69 72 65 63 | 74 6f 72 79 20 67 72 6f |ge-direc|tory gro|
|000021a0| 75 70 20 73 65 72 76 65 | 72 20 6e 6e 6d 61 69 6c |up serve|r nnmail|
|000021b0| 2d 63 68 65 63 6b 2d 73 | 79 6e 74 61 78 20 6e 69 |-check-s|yntax ni|
|000021c0| 6c 20 72 65 73 75 6c 74 | 20 6e 6e 6d 61 69 6c 2d |l result| nnmail-|
|000021d0| 61 63 74 69 76 61 74 65 | 20 6e 6e 6d 6c 20 22 22 |activate| nnml ""|
|000021e0| 20 6e 6e 6d 61 69 6c 2d | 73 70 6c 69 74 2d 6d 65 | nnmail-|split-me|
|000021f0| 74 68 6f 64 73 20 6e 6e | 6d 6c 2d 73 61 76 65 2d |thods nn|ml-save-|
|00002200| 6d 61 69 6c 20 6e 6e 6d | 61 69 6c 2d 73 61 76 65 |mail nnm|ail-save|
|00002210| 2d 61 63 74 69 76 65 20 | 6e 6e 6d 6c 2d 67 72 6f |-active |nnml-gro|
|00002220| 75 70 2d 61 6c 69 73 74 | 20 6e 6e 6d 6c 2d 61 63 |up-alist| nnml-ac|
|00002230| 74 69 76 65 2d 66 69 6c | 65 20 6c 61 73 74 20 6e |tive-fil|e last n|
|00002240| 6e 6d 6c 2d 73 61 76 65 | 2d 6e 6f 76 5d 20 33 5d |nml-save|-nov] 3]|
|00002250| 29 0a 28 6e 6e 6f 6f 2d | 72 65 67 69 73 74 65 72 |).(nnoo-|register|
|00002260| 2d 66 75 6e 63 74 69 6f | 6e 20 28 71 75 6f 74 65 |-functio|n (quote|
|00002270| 20 6e 6e 6d 6c 2d 72 65 | 71 75 65 73 74 2d 61 63 | nnml-re|quest-ac|
|00002280| 63 65 70 74 2d 61 72 74 | 69 63 6c 65 29 29 0a 28 |cept-art|icle)).(|
|00002290| 64 65 66 61 6c 69 61 73 | 20 27 6e 6e 6d 6c 2d 72 |defalias| 'nnml-r|
|000022a0| 65 71 75 65 73 74 2d 72 | 65 70 6c 61 63 65 2d 61 |equest-r|eplace-a|
|000022b0| 72 74 69 63 6c 65 20 23 | 5b 28 61 72 74 69 63 6c |rticle #|[(articl|
|000022c0| 65 20 67 72 6f 75 70 20 | 62 75 66 66 65 72 29 20 |e group |buffer) |
|000022d0| 22 c0 09 21 88 8a 5c 6e | 71 88 c3 09 21 88 c4 20 |"..!..\n|q...!.. |
|000022e0| c5 0e 06 21 c7 50 c8 1e | 09 1e 5c 6e 1e 0b c8 cc |...!.P..|..\n....|
|000022f0| cd 8f 85 79 00 ce 0e 0b | 0e 06 5c 22 16 09 8a cf |...y....|..\"....|
|00002300| 09 21 71 88 65 62 88 d0 | 0e 5c 6e 21 84 45 00 d1 |.!q.eb..|.\n!.E..|
|00002310| d2 0e 5c 6e 50 c8 d3 23 | 83 52 00 d4 79 88 60 d5 |..\nP..#|.R..y.`.|
|00002320| 79 88 60 7c 88 82 6c 00 | d0 d6 21 83 6c 00 d7 d4 |y.`|..l.|..!.l...|
|00002330| 94 d4 95 7b 21 0e 06 57 | 83 6c 00 d5 79 d4 55 84 |...{!..W|.l..y.U.|
|00002340| 52 00 d4 79 88 d8 0e 09 | 21 88 d9 20 88 29 d3 2c |R..y....|!.. .).,|
|00002350| 87 22 20 5b 6e 6e 6d 6c | 2d 70 6f 73 73 69 62 6c |." [nnml|-possibl|
|00002360| 79 2d 63 68 61 6e 67 65 | 2d 64 69 72 65 63 74 6f |y-change|-directo|
|00002370| 72 79 20 67 72 6f 75 70 | 20 62 75 66 66 65 72 20 |ry group| buffer |
|00002380| 6e 6e 6d 6c 2d 70 6f 73 | 73 69 62 6c 79 2d 63 72 |nnml-pos|sibly-cr|
|00002390| 65 61 74 65 2d 64 69 72 | 65 63 74 6f 72 79 20 6e |eate-dir|ectory n|
|000023a0| 6e 6d 61 69 6c 2d 69 6e | 73 65 72 74 2d 6c 69 6e |nmail-in|sert-lin|
|000023b0| 65 73 20 69 6e 74 2d 74 | 6f 2d 73 74 72 69 6e 67 |es int-t|o-string|
|000023c0| 20 61 72 74 69 63 6c 65 | 20 22 09 22 20 6e 69 6c | article| "." nil|
|000023d0| 20 68 65 61 64 65 72 73 | 20 61 72 74 20 63 68 61 | headers| art cha|
|000023e0| 72 73 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |rs (byte|-code ".|
|000023f0| 65 64 09 c2 0b 21 50 c4 | c5 c6 21 3f 85 11 00 c7 |ed...!P.|..!?....|
|00002400| 25 88 c8 87 22 20 5b 77 | 72 69 74 65 2d 72 65 67 |%..." [w|rite-reg|
|00002410| 69 6f 6e 20 6e 6e 6d 6c | 2d 63 75 72 72 65 6e 74 |ion nnml|-current|
|00002420| 2d 64 69 72 65 63 74 6f | 72 79 20 69 6e 74 2d 74 |-directo|ry int-t|
|00002430| 6f 2d 73 74 72 69 6e 67 | 20 61 72 74 69 63 6c 65 |o-string| article|
|00002440| 20 6e 69 6c 20 6e 6e 68 | 65 61 64 65 72 2d 62 65 | nil nnh|eader-be|
|00002450| 2d 76 65 72 62 6f 73 65 | 20 35 20 6e 6f 6d 65 73 |-verbose| 5 nomes|
|00002460| 67 20 74 5d 20 37 29 20 | 28 28 65 72 72 6f 72 29 |g t] 7) |((error)|
|00002470| 29 20 6e 6e 6d 6c 2d 70 | 61 72 73 65 2d 68 65 61 |) nnml-p|arse-hea|
|00002480| 64 20 6e 6e 6d 6c 2d 6f | 70 65 6e 2d 6e 6f 76 20 |d nnml-o|pen-nov |
|00002490| 6c 6f 6f 6b 69 6e 67 2d | 61 74 20 73 65 61 72 63 |looking-|at searc|
|000024a0| 68 2d 66 6f 72 77 61 72 | 64 20 22 5c 6e 22 20 74 |h-forwar|d "\n" t|
|000024b0| 20 30 20 31 20 22 5b 30 | 2d 39 5d 2b 09 22 20 73 | 0 1 "[0|-9]+." s|
|000024c0| 74 72 69 6e 67 2d 74 6f | 2d 69 6e 74 20 6e 6e 68 |tring-to|-int nnh|
|000024d0| 65 61 64 65 72 2d 69 6e | 73 65 72 74 2d 6e 6f 76 |eader-in|sert-nov|
|000024e0| 20 6e 6e 6d 6c 2d 73 61 | 76 65 2d 6e 6f 76 5d 20 | nnml-sa|ve-nov] |
|000024f0| 34 5d 29 0a 28 6e 6e 6f | 6f 2d 72 65 67 69 73 74 |4]).(nno|o-regist|
|00002500| 65 72 2d 66 75 6e 63 74 | 69 6f 6e 20 28 71 75 6f |er-funct|ion (quo|
|00002510| 74 65 20 6e 6e 6d 6c 2d | 72 65 71 75 65 73 74 2d |te nnml-|request-|
|00002520| 72 65 70 6c 61 63 65 2d | 61 72 74 69 63 6c 65 29 |replace-|article)|
|00002530| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 6d |).(defal|ias 'nnm|
|00002540| 6c 2d 72 65 71 75 65 73 | 74 2d 64 65 6c 65 74 65 |l-reques|t-delete|
|00002550| 2d 67 72 6f 75 70 20 23 | 5b 28 67 72 6f 75 70 20 |-group #|[(group |
|00002560| 26 6f 70 74 69 6f 6e 61 | 6c 20 66 6f 72 63 65 20 |&optiona|l force |
|00002570| 73 65 72 76 65 72 29 20 | 22 c0 09 5c 6e 5c 22 88 |server) |"..\n\".|
|00002580| 0b 83 47 00 c4 0d c6 0e | 07 c8 c9 0e 5c 6e 21 cb |..G.....|....\n!.|
|00002590| 52 23 cc 1e 0d 1e 0e 0e | 0e 83 41 00 0e 0e 89 41 |R#......|..A....A|
|000025a0| 16 0e 40 16 0d cf 0e 0d | 21 83 1b 00 d0 d1 d2 0e |..@.....|!.......|
|000025b0| 0d 09 24 88 0e 13 0e 0d | 21 88 82 1b 00 2a cc d4 |..$.....|!....*..|
|000025c0| d5 8f 88 d6 d7 09 0e 18 | 5c 22 0e 18 5c 22 16 18 |........|\"..\"..|
|000025d0| cc 16 19 cc 15 da 0e 18 | 0e 1b 5c 22 88 c6 87 22 |........|..\"..."|
|000025e0| 20 5b 6e 6e 6d 6c 2d 70 | 6f 73 73 69 62 6c 79 2d | [nnml-p|ossibly-|
|000025f0| 63 68 61 6e 67 65 2d 64 | 69 72 65 63 74 6f 72 79 |change-d|irectory|
|00002600| 20 67 72 6f 75 70 20 73 | 65 72 76 65 72 20 66 6f | group s|erver fo|
|00002610| 72 63 65 20 64 69 72 65 | 63 74 6f 72 79 2d 66 69 |rce dire|ctory-fi|
|00002620| 6c 65 73 20 6e 6e 6d 6c | 2d 63 75 72 72 65 6e 74 |les nnml|-current|
|00002630| 2d 64 69 72 65 63 74 6f | 72 79 20 74 20 6e 6e 68 |-directo|ry t nnh|
|00002640| 65 61 64 65 72 2d 6e 75 | 6d 65 72 69 63 61 6c 2d |eader-nu|merical-|
|00002650| 73 68 6f 72 74 2d 66 69 | 6c 65 73 20 22 5c 5c 7c |short-fi|les "\\||
|00002660| 22 20 72 65 67 65 78 70 | 2d 71 75 6f 74 65 20 6e |" regexp|-quote n|
|00002670| 6e 6d 6c 2d 6e 6f 76 2d | 66 69 6c 65 2d 6e 61 6d |nml-nov-|file-nam|
|00002680| 65 20 22 24 22 20 6e 69 | 6c 20 61 72 74 69 63 6c |e "$" ni|l articl|
|00002690| 65 20 61 72 74 69 63 6c | 65 73 20 66 69 6c 65 2d |e articl|es file-|
|000026a0| 77 72 69 74 61 62 6c 65 | 2d 70 20 6e 6e 68 65 61 |writable|-p nnhea|
|000026b0| 64 65 72 2d 6d 65 73 73 | 61 67 65 20 35 20 22 44 |der-mess|age 5 "D|
|000026c0| 65 6c 65 74 69 6e 67 20 | 61 72 74 69 63 6c 65 20 |eleting |article |
|000026d0| 25 73 20 69 6e 20 25 73 | 2e 2e 2e 22 20 6e 6e 6d |%s in %s|..." nnm|
|000026e0| 61 69 6c 2d 64 65 6c 65 | 74 65 2d 66 69 6c 65 2d |ail-dele|te-file-|
|000026f0| 66 75 6e 63 74 69 6f 6e | 20 28 64 65 6c 65 74 65 |function| (delete|
|00002700| 2d 64 69 72 65 63 74 6f | 72 79 20 6e 6e 6d 6c 2d |-directo|ry nnml-|
|00002710| 63 75 72 72 65 6e 74 2d | 64 69 72 65 63 74 6f 72 |current-|director|
|00002720| 79 29 20 28 28 65 72 72 | 6f 72 29 29 20 64 65 6c |y) ((err|or)) del|
|00002730| 71 20 61 73 73 6f 63 20 | 6e 6e 6d 6c 2d 67 72 6f |q assoc |nnml-gro|
|00002740| 75 70 2d 61 6c 69 73 74 | 20 6e 6e 6d 6c 2d 63 75 |up-alist| nnml-cu|
|00002750| 72 72 65 6e 74 2d 67 72 | 6f 75 70 20 6e 6e 6d 61 |rrent-gr|oup nnma|
|00002760| 69 6c 2d 73 61 76 65 2d | 61 63 74 69 76 65 20 6e |il-save-|active n|
|00002770| 6e 6d 6c 2d 61 63 74 69 | 76 65 2d 66 69 6c 65 5d |nml-acti|ve-file]|
|00002780| 20 37 5d 29 0a 28 6e 6e | 6f 6f 2d 72 65 67 69 73 | 7]).(nn|oo-regis|
|00002790| 74 65 72 2d 66 75 6e 63 | 74 69 6f 6e 20 28 71 75 |ter-func|tion (qu|
|000027a0| 6f 74 65 20 6e 6e 6d 6c | 2d 72 65 71 75 65 73 74 |ote nnml|-request|
|000027b0| 2d 64 65 6c 65 74 65 2d | 67 72 6f 75 70 29 29 0a |-delete-|group)).|
|000027c0| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 6e 6d 6c 2d |(defalia|s 'nnml-|
|000027d0| 72 65 71 75 65 73 74 2d | 72 65 6e 61 6d 65 2d 67 |request-|rename-g|
|000027e0| 72 6f 75 70 20 23 5b 28 | 67 72 6f 75 70 20 6e 65 |roup #[(|group ne|
|000027f0| 77 2d 6e 61 6d 65 20 26 | 6f 70 74 69 6f 6e 61 6c |w-name &|optional|
|00002800| 20 73 65 72 76 65 72 29 | 20 22 c0 09 5c 6e 5c 22 | server)| "..\n\"|
|00002810| 88 c3 5c 66 21 85 31 00 | c5 c6 c7 8f 85 31 00 c8 |..\f!.1.|.....1..|
|00002820| 09 0e 09 5c 22 89 1e 5c | 6e 83 23 00 0e 5c 6e 0e |...\"..\|n.#..\n.|
|00002830| 0b a0 88 c5 14 c5 16 5c | 66 cd 0e 09 0e 0e 5c 22 |.......\|f.....\"|
|00002840| 88 29 cf 87 22 20 5b 6e | 6e 6d 6c 2d 70 6f 73 73 |.).." [n|nml-poss|
|00002850| 69 62 6c 79 2d 63 68 61 | 6e 67 65 2d 64 69 72 65 |ibly-cha|nge-dire|
|00002860| 63 74 6f 72 79 20 67 72 | 6f 75 70 20 73 65 72 76 |ctory gr|oup serv|
|00002870| 65 72 20 66 69 6c 65 2d | 77 72 69 74 61 62 6c 65 |er file-|writable|
|00002880| 2d 70 20 6e 6e 6d 6c 2d | 63 75 72 72 65 6e 74 2d |-p nnml-|current-|
|00002890| 64 69 72 65 63 74 6f 72 | 79 20 6e 69 6c 20 28 62 |director|y nil (b|
|000028a0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 c2 0b 5c 66 |yte-code| "....\f|
|000028b0| 5c 22 21 21 1d c6 0d 21 | 84 14 00 c7 0d c8 5c 22 |\"!!...!|......\"|
|000028c0| 88 c9 c1 0e 5c 6e 21 c1 | c2 0b 5c 66 5c 22 21 5c |....\n!.|..\f\"!\|
|000028d0| 22 88 29 c8 87 22 20 5b | 66 69 6c 65 2d 6e 61 6d |".).." [|file-nam|
|000028e0| 65 2d 64 69 72 65 63 74 | 6f 72 79 20 64 69 72 65 |e-direct|ory dire|
|000028f0| 63 74 6f 72 79 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |ctory-fi|le-name |
|00002900| 6e 6e 6d 61 69 6c 2d 67 | 72 6f 75 70 2d 70 61 74 |nnmail-g|roup-pat|
|00002910| 68 6e 61 6d 65 20 6e 65 | 77 2d 6e 61 6d 65 20 6e |hname ne|w-name n|
|00002920| 6e 6d 6c 2d 64 69 72 65 | 63 74 6f 72 79 20 70 61 |nml-dire|ctory pa|
|00002930| 72 65 6e 74 20 66 69 6c | 65 2d 65 78 69 73 74 73 |rent fil|e-exists|
|00002940| 2d 70 20 6d 61 6b 65 2d | 64 69 72 65 63 74 6f 72 |-p make-|director|
|00002950| 79 20 74 20 72 65 6e 61 | 6d 65 2d 66 69 6c 65 20 |y t rena|me-file |
|00002960| 6e 6e 6d 6c 2d 63 75 72 | 72 65 6e 74 2d 64 69 72 |nnml-cur|rent-dir|
|00002970| 65 63 74 6f 72 79 5d 20 | 36 29 20 28 28 65 72 72 |ectory] |6) ((err|
|00002980| 6f 72 29 29 20 61 73 73 | 6f 63 20 6e 6e 6d 6c 2d |or)) ass|oc nnml-|
|00002990| 67 72 6f 75 70 2d 61 6c | 69 73 74 20 65 6e 74 72 |group-al|ist entr|
|000029a0| 79 20 6e 65 77 2d 6e 61 | 6d 65 20 6e 6e 6d 6c 2d |y new-na|me nnml-|
|000029b0| 63 75 72 72 65 6e 74 2d | 67 72 6f 75 70 20 6e 6e |current-|group nn|
|000029c0| 6d 61 69 6c 2d 73 61 76 | 65 2d 61 63 74 69 76 65 |mail-sav|e-active|
|000029d0| 20 6e 6e 6d 6c 2d 61 63 | 74 69 76 65 2d 66 69 6c | nnml-ac|tive-fil|
|000029e0| 65 20 74 5d 20 34 5d 29 | 0a 28 6e 6e 6f 6f 2d 72 |e t] 4])|.(nnoo-r|
|000029f0| 65 67 69 73 74 65 72 2d | 66 75 6e 63 74 69 6f 6e |egister-|function|
|00002a00| 20 28 71 75 6f 74 65 20 | 6e 6e 6d 6c 2d 72 65 71 | (quote |nnml-req|
|00002a10| 75 65 73 74 2d 72 65 6e | 61 6d 65 2d 67 72 6f 75 |uest-ren|ame-grou|
|00002a20| 70 29 29 0a 23 40 34 36 | 20 53 61 79 20 77 68 65 |p)).#@46| Say whe|
|00002a30| 74 68 65 72 20 41 52 54 | 49 43 4c 45 20 69 6e 20 |ther ART|ICLE in |
|00002a40| 47 52 4f 55 50 20 63 61 | 6e 20 62 65 20 64 65 6c |GROUP ca|n be del|
|00002a50| 65 74 65 64 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |eted...(|defalias|
|00002a60| 20 27 6e 6e 6d 6c 2d 64 | 65 6c 65 74 61 62 6c 65 | 'nnml-d|eletable|
|00002a70| 2d 61 72 74 69 63 6c 65 | 2d 70 20 23 5b 28 67 72 |-article|-p #[(gr|
|00002a80| 6f 75 70 20 61 72 74 69 | 63 6c 65 29 20 22 c0 89 |oup arti|cle) "..|
|00002a90| 19 1a 0b 5c 66 9e 41 89 | 12 85 29 00 0d 5c 6e 50 |...\f.A.|..)..\nP|
|00002aa0| 11 c6 09 21 85 29 00 0e | 07 3f 86 29 00 c8 0e 09 |...!.)..|.?.)....|
|00002ab0| 0e 5c 6e 5c 22 41 40 41 | 0b 3d 3f 2a 87 22 20 5b |.\n\"A@A|.=?*." [|
|00002ac0| 6e 69 6c 20 70 61 74 68 | 20 66 69 6c 65 20 61 72 |nil path| file ar|
|00002ad0| 74 69 63 6c 65 20 6e 6e | 6d 6c 2d 61 72 74 69 63 |ticle nn|ml-artic|
|00002ae0| 6c 65 2d 66 69 6c 65 2d | 61 6c 69 73 74 20 6e 6e |le-file-|alist nn|
|00002af0| 6d 6c 2d 63 75 72 72 65 | 6e 74 2d 64 69 72 65 63 |ml-curre|nt-direc|
|00002b00| 74 6f 72 79 20 66 69 6c | 65 2d 77 72 69 74 61 62 |tory fil|e-writab|
|00002b10| 6c 65 2d 70 20 6e 6e 6d | 61 69 6c 2d 6b 65 65 70 |le-p nnm|ail-keep|
|00002b20| 2d 6c 61 73 74 2d 61 72 | 74 69 63 6c 65 20 61 73 |-last-ar|ticle as|
|00002b30| 73 6f 63 20 67 72 6f 75 | 70 20 6e 6e 6d 6c 2d 67 |soc grou|p nnml-g|
|00002b40| 72 6f 75 70 2d 61 6c 69 | 73 74 5d 20 33 20 28 23 |roup-ali|st] 3 (#|
|00002b50| 24 20 2e 20 31 30 37 39 | 33 29 5d 29 0a 28 64 65 |$ . 1079|3)]).(de|
|00002b60| 66 61 6c 69 61 73 20 27 | 6e 6e 6d 6c 2d 66 69 6e |falias '|nnml-fin|
|00002b70| 64 2d 67 72 6f 75 70 2d | 6e 75 6d 62 65 72 20 23 |d-group-|number #|
|00002b80| 5b 28 69 64 29 20 22 8a | c0 c1 21 71 88 c2 70 21 |[(id) ".|..!q..p!|
|00002b90| 88 0b c4 1d 1e 06 c7 0e | 08 0e 09 5c 22 89 15 83 |........|...\"...|
|00002ba0| 21 00 0e 08 0d 42 82 53 | 00 0d 84 49 00 0e 06 83 |!....B.S|...I....|
|00002bb0| 49 00 0e 06 40 40 0e 08 | 98 84 3d 00 c7 0e 06 40 |I...@@..|..=....@|
|00002bc0| 40 0e 09 5c 22 15 0d 84 | 21 00 0e 06 41 16 06 82 |@..\"...|!...A...|
|00002bd0| 21 00 0d 85 53 00 0e 06 | 40 40 0d 42 2b 87 22 20 |!...S...|@@.B+." |
|00002be0| 5b 67 65 74 2d 62 75 66 | 66 65 72 2d 63 72 65 61 |[get-buf|fer-crea|
|00002bf0| 74 65 20 22 20 2a 6e 6e | 6d 6c 20 69 64 2a 22 20 |te " *nn|ml id*" |
|00002c00| 62 75 66 66 65 72 2d 64 | 69 73 61 62 6c 65 2d 75 |buffer-d|isable-u|
|00002c10| 6e 64 6f 20 6e 6e 6d 6c | 2d 67 72 6f 75 70 2d 61 |ndo nnml|-group-a|
|00002c20| 6c 69 73 74 20 6e 69 6c | 20 6e 75 6d 62 65 72 20 |list nil| number |
|00002c30| 61 6c 69 73 74 20 6e 6e | 6d 6c 2d 66 69 6e 64 2d |alist nn|ml-find-|
|00002c40| 69 64 20 6e 6e 6d 6c 2d | 63 75 72 72 65 6e 74 2d |id nnml-|current-|
|00002c50| 67 72 6f 75 70 20 69 64 | 5d 20 33 5d 29 0a 28 64 |group id|] 3]).(d|
|00002c60| 65 66 61 6c 69 61 73 20 | 27 6e 6e 6d 6c 2d 66 69 |efalias |'nnml-fi|
|00002c70| 6e 64 2d 69 64 20 23 5b | 28 67 72 6f 75 70 20 69 |nd-id #[|(group i|
|00002c80| 64 29 20 22 c0 20 88 c1 | 5c 6e 0b 5c 22 5c 66 50 |d) ". ..|\n.\"\fP|
|00002c90| c5 89 1e 06 1e 07 1e 08 | c9 0e 08 21 85 4a 00 ca |........|...!.J..|
|00002ca0| 0e 08 21 88 0e 06 84 48 | 00 cb 0e 5c 66 c5 cd 23 |..!....H|...\f..#|
|00002cb0| 83 48 00 ce cf 8a d0 79 | 88 60 29 cd d1 24 83 1d |.H.....y|.`)..$..|
|00002cc0| 00 d0 79 88 cd 16 06 c5 | d2 d3 8f 16 07 82 1d 00 |..y.....|........|
|00002cd0| 0e 07 2b 87 22 20 5b 65 | 72 61 73 65 2d 62 75 66 |..+." [e|rase-buf|
|00002ce0| 66 65 72 20 6e 6e 6d 61 | 69 6c 2d 67 72 6f 75 70 |fer nnma|il-group|
|00002cf0| 2d 70 61 74 68 6e 61 6d | 65 20 67 72 6f 75 70 20 |-pathnam|e group |
|00002d00| 6e 6e 6d 6c 2d 64 69 72 | 65 63 74 6f 72 79 20 6e |nnml-dir|ectory n|
|00002d10| 6e 6d 6c 2d 6e 6f 76 2d | 66 69 6c 65 2d 6e 61 6d |nml-nov-|file-nam|
|00002d20| 65 20 6e 69 6c 20 66 6f | 75 6e 64 20 6e 75 6d 62 |e nil fo|und numb|
|00002d30| 65 72 20 6e 6f 76 20 66 | 69 6c 65 2d 65 78 69 73 |er nov f|ile-exis|
|00002d40| 74 73 2d 70 20 69 6e 73 | 65 72 74 2d 66 69 6c 65 |ts-p ins|ert-file|
|00002d50| 2d 63 6f 6e 74 65 6e 74 | 73 20 73 65 61 72 63 68 |-content|s search|
|00002d60| 2d 66 6f 72 77 61 72 64 | 20 69 64 20 74 20 73 65 |-forward| id t se|
|00002d70| 61 72 63 68 2d 62 61 63 | 6b 77 61 72 64 20 22 09 |arch-bac|kward ".|
|00002d80| 22 20 30 20 34 20 28 62 | 79 74 65 2d 63 6f 64 65 |" 0 4 (b|yte-code|
|00002d90| 20 22 c0 70 21 87 22 20 | 5b 72 65 61 64 5d 20 32 | ".p!." |[read] 2|
|00002da0| 29 20 28 28 65 72 72 6f | 72 29 29 5d 20 35 5d 29 |) ((erro|r))] 5])|
|00002db0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6e 6e 6d 6c |.(defali|as 'nnml|
|00002dc0| 2d 72 65 74 72 69 65 76 | 65 2d 68 65 61 64 65 72 |-retriev|e-header|
|00002dd0| 73 2d 77 69 74 68 2d 6e | 6f 76 20 23 5b 28 61 72 |s-with-n|ov #[(ar|
|00002de0| 74 69 63 6c 65 73 20 26 | 6f 70 74 69 6f 6e 61 6c |ticles &|optional|
|00002df0| 20 66 65 74 63 68 2d 6f | 6c 64 29 20 22 08 86 05 | fetch-o|ld) "...|
|00002e00| 00 09 3f 85 92 00 5c 6e | 40 5c 6e 41 83 17 00 5c |..?...\n|@\nA...\|
|00002e10| 6e 41 89 12 82 5c 66 00 | 5c 6e 40 0b 5c 66 50 1d |nA...\f.|\n@.\fP.|
|00002e20| 1e 06 1e 07 c8 0d 21 85 | 91 00 8a 0e 09 71 88 ca |......!.|.....q..|
|00002e30| 20 88 cb 0d 21 88 0e 5c | 66 83 42 00 0e 5c 66 a7 | ...!..\|f.B..\f.|
|00002e40| 84 42 00 cd 82 90 00 0e | 5c 66 83 50 00 ce 0e 07 |.B......|\f.P....|
|00002e50| 0e 5c 66 5a 5d 16 07 65 | 62 88 6d 84 66 00 0e 07 |.\fZ]..e|b.m.f...|
|00002e60| cf 70 21 56 83 66 00 ce | 79 88 82 53 00 d0 79 88 |.p!V.f..|y..S..y.|
|00002e70| 6d 84 71 00 ce 60 7c 88 | 6d 84 84 00 0e 06 cf 70 |m.q..`|.|m......p|
|00002e80| 21 59 83 84 00 ce 79 88 | 82 71 00 d0 79 88 6d 84 |!Y....y.|.q..y.m.|
|00002e90| 8f 00 60 64 7c 88 cd 29 | 2b 87 22 20 5b 67 6e 75 |..`d|..)|+." [gnu|
|00002ea0| 73 2d 6e 6f 76 2d 69 73 | 2d 65 76 69 6c 20 6e 6e |s-nov-is|-evil nn|
|00002eb0| 6d 6c 2d 6e 6f 76 2d 69 | 73 2d 65 76 69 6c 20 61 |ml-nov-i|s-evil a|
|00002ec0| 72 74 69 63 6c 65 73 20 | 6e 6e 6d 6c 2d 63 75 72 |rticles |nnml-cur|
|00002ed0| 72 65 6e 74 2d 64 69 72 | 65 63 74 6f 72 79 20 6e |rent-dir|ectory n|
|00002ee0| 6e 6d 6c 2d 6e 6f 76 2d | 66 69 6c 65 2d 6e 61 6d |nml-nov-|file-nam|
|00002ef0| 65 20 6e 6f 76 20 6c 61 | 73 74 20 66 69 72 73 74 |e nov la|st first|
|00002f00| 20 66 69 6c 65 2d 65 78 | 69 73 74 73 2d 70 20 6e | file-ex|ists-p n|
|00002f10| 6e 74 70 2d 73 65 72 76 | 65 72 2d 62 75 66 66 65 |ntp-serv|er-buffe|
|00002f20| 72 20 65 72 61 73 65 2d | 62 75 66 66 65 72 20 69 |r erase-|buffer i|
|00002f30| 6e 73 65 72 74 2d 66 69 | 6c 65 2d 63 6f 6e 74 65 |nsert-fi|le-conte|
|00002f40| 6e 74 73 20 66 65 74 63 | 68 2d 6f 6c 64 20 74 20 |nts fetc|h-old t |
|00002f50| 31 20 72 65 61 64 20 30 | 5d 20 35 5d 29 0a 28 64 |1 read 0|] 5]).(d|
|00002f60| 65 66 61 6c 69 61 73 20 | 27 6e 6e 6d 6c 2d 70 6f |efalias |'nnml-po|
|00002f70| 73 73 69 62 6c 79 2d 63 | 68 61 6e 67 65 2d 64 69 |ssibly-c|hange-di|
|00002f80| 72 65 63 74 6f 72 79 20 | 23 5b 28 67 72 6f 75 70 |rectory |#[(group|
|00002f90| 20 26 6f 70 74 69 6f 6e | 61 6c 20 73 65 72 76 65 | &option|al serve|
|00002fa0| 72 29 20 22 08 83 0e 00 | c1 08 21 84 0e 00 c2 08 |r) "....|..!.....|
|00002fb0| 21 88 0b 83 2a 00 c4 0b | 0d 5c 22 89 1e 06 0e 07 |!...*...|.\".....|
|00002fc0| 9a 84 29 00 0e 06 16 07 | 0b 16 08 c9 16 5c 6e 29 |..).....|.....\n)|
|00002fd0| cb 87 22 20 5b 73 65 72 | 76 65 72 20 6e 6e 6d 6c |.." [ser|ver nnml|
|00002fe0| 2d 73 65 72 76 65 72 2d | 6f 70 65 6e 65 64 20 6e |-server-|opened n|
|00002ff0| 6e 6d 6c 2d 6f 70 65 6e | 2d 73 65 72 76 65 72 20 |nml-open|-server |
|00003000| 67 72 6f 75 70 20 6e 6e | 6d 61 69 6c 2d 67 72 6f |group nn|mail-gro|
|00003010| 75 70 2d 70 61 74 68 6e | 61 6d 65 20 6e 6e 6d 6c |up-pathn|ame nnml|
|00003020| 2d 64 69 72 65 63 74 6f | 72 79 20 70 61 74 68 6e |-directo|ry pathn|
|00003030| 61 6d 65 20 6e 6e 6d 6c | 2d 63 75 72 72 65 6e 74 |ame nnml|-current|
|00003040| 2d 64 69 72 65 63 74 6f | 72 79 20 6e 6e 6d 6c 2d |-directo|ry nnml-|
|00003050| 63 75 72 72 65 6e 74 2d | 67 72 6f 75 70 20 6e 69 |current-|group ni|
|00003060| 6c 20 6e 6e 6d 6c 2d 61 | 72 74 69 63 6c 65 2d 66 |l nnml-a|rticle-f|
|00003070| 69 6c 65 2d 61 6c 69 73 | 74 20 74 5d 20 34 5d 29 |ile-alis|t t] 4])|
|00003080| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6e 6e 6d 6c |.(defali|as 'nnml|
|00003090| 2d 70 6f 73 73 69 62 6c | 79 2d 63 72 65 61 74 65 |-possibl|y-create|
|000030a0| 2d 64 69 72 65 63 74 6f | 72 79 20 23 5b 28 67 72 |-directo|ry #[(gr|
|000030b0| 6f 75 70 29 20 22 c0 89 | 19 1a c3 5c 66 0d 5c 22 |oup) "..|...\f.\"|
|000030c0| 12 c6 5c 6e 21 84 1c 00 | 5c 6e 09 42 11 c7 c8 5c |..\n!...|\n.B...\|
|000030d0| 6e 21 21 12 82 09 00 09 | 85 36 00 c9 c8 09 40 21 |n!!.....|.6....@!|
|000030e0| 21 88 ca cb cc 09 40 23 | 88 09 41 89 11 84 20 00 |!.....@#|..A... .|
|000030f0| c0 2a 87 22 20 5b 6e 69 | 6c 20 64 69 72 73 20 64 |.*." [ni|l dirs d|
|00003100| 69 72 20 6e 6e 6d 61 69 | 6c 2d 67 72 6f 75 70 2d |ir nnmai|l-group-|
|00003110| 70 61 74 68 6e 61 6d 65 | 20 67 72 6f 75 70 20 6e |pathname| group n|
|00003120| 6e 6d 6c 2d 64 69 72 65 | 63 74 6f 72 79 20 66 69 |nml-dire|ctory fi|
|00003130| 6c 65 2d 64 69 72 65 63 | 74 6f 72 79 2d 70 20 66 |le-direc|tory-p f|
|00003140| 69 6c 65 2d 6e 61 6d 65 | 2d 64 69 72 65 63 74 6f |ile-name|-directo|
|00003150| 72 79 20 64 69 72 65 63 | 74 6f 72 79 2d 66 69 6c |ry direc|tory-fil|
|00003160| 65 2d 6e 61 6d 65 20 6d | 61 6b 65 2d 64 69 72 65 |e-name m|ake-dire|
|00003170| 63 74 6f 72 79 20 6e 6e | 68 65 61 64 65 72 2d 6d |ctory nn|header-m|
|00003180| 65 73 73 61 67 65 20 35 | 20 22 43 72 65 61 74 69 |essage 5| "Creati|
|00003190| 6e 67 20 6d 61 69 6c 20 | 64 69 72 65 63 74 6f 72 |ng mail |director|
|000031a0| 79 20 25 73 22 5d 20 35 | 5d 29 0a 23 40 33 32 20 |y %s"] 5|]).#@32 |
|000031b0| 43 61 6c 6c 65 64 20 6e | 61 72 72 6f 77 65 64 20 |Called n|arrowed |
|000031c0| 74 6f 20 61 6e 20 61 72 | 74 69 63 6c 65 2e 1f 0a |to an ar|ticle...|
|000031d0| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 6e 6d 6c 2d |(defalia|s 'nnml-|
|000031e0| 73 61 76 65 2d 6d 61 69 | 6c 20 23 5b 6e 69 6c 20 |save-mai|l #[nil |
|000031f0| 22 c0 c1 21 9f c2 89 1b | 1c 1d c6 20 14 c7 0d 21 |"..!....|... ...!|
|00003200| 88 c8 c9 21 88 c8 ca 21 | 88 65 62 88 cb cc 21 83 |...!...!|.eb...!.|
|00003210| 2b 00 cd ce 21 88 cf 79 | 88 82 1b 00 0d c2 1e 10 |+...!..y|........|
|00003220| 89 1e 11 83 7c 00 d2 0e | 11 40 40 21 88 d3 0e 11 |....|...|.@@!....|
|00003230| 40 40 0e 14 5c 22 d5 0e | 11 40 41 21 50 1e 16 0e |@@..\"..|.@A!P...|
|00003240| 10 83 5e 00 0e 17 0e 10 | 0e 16 d8 23 88 82 72 00 |..^.....|...#..r.|
|00003250| d9 65 64 0e 16 c2 da db | 21 3f 85 6c 00 dc 25 88 |.ed.....|!?.l..%.|
|00003260| 0e 16 16 10 29 0e 11 41 | 89 16 11 84 35 00 2a dd |....)..A|....5.*.|
|00003270| 5c 66 21 13 0d 89 1e 11 | 83 9d 00 de 0e 11 40 40 |\f!.....|......@@|
|00003280| 0e 11 40 41 0b 23 88 0e | 11 41 89 16 11 84 88 00 |..@A.#..|.A......|
|00003290| 29 0d 2b 87 22 20 5b 6e | 6e 6d 61 69 6c 2d 61 72 |).+." [n|nmail-ar|
|000032a0| 74 69 63 6c 65 2d 67 72 | 6f 75 70 20 6e 6e 6d 6c |ticle-gr|oup nnml|
|000032b0| 2d 61 63 74 69 76 65 2d | 6e 75 6d 62 65 72 20 6e |-active-|number n|
|000032c0| 69 6c 20 68 65 61 64 65 | 72 73 20 63 68 61 72 73 |il heade|rs chars|
|000032d0| 20 67 72 6f 75 70 2d 61 | 72 74 20 6e 6e 6d 61 69 | group-a|rt nnmai|
|000032e0| 6c 2d 69 6e 73 65 72 74 | 2d 6c 69 6e 65 73 20 6e |l-insert|-lines n|
|000032f0| 6e 6d 61 69 6c 2d 69 6e | 73 65 72 74 2d 78 72 65 |nmail-in|sert-xre|
|00003300| 66 20 72 75 6e 2d 68 6f | 6f 6b 73 20 6e 6e 6d 61 |f run-ho|oks nnma|
|00003310| 69 6c 2d 70 72 65 70 61 | 72 65 2d 73 61 76 65 2d |il-prepa|re-save-|
|00003320| 6d 61 69 6c 2d 68 6f 6f | 6b 20 6e 6e 6d 6c 2d 70 |mail-hoo|k nnml-p|
|00003330| 72 65 70 61 72 65 2d 73 | 61 76 65 2d 6d 61 69 6c |repare-s|ave-mail|
|00003340| 2d 68 6f 6f 6b 20 6c 6f | 6f 6b 69 6e 67 2d 61 74 |-hook lo|oking-at|
|00003350| 20 22 46 72 6f 6d 20 22 | 20 72 65 70 6c 61 63 65 | "From "| replace|
|00003360| 2d 6d 61 74 63 68 20 22 | 58 2d 46 72 6f 6d 2d 4c |-match "|X-From-L|
|00003370| 69 6e 65 3a 20 22 20 31 | 20 66 69 72 73 74 20 67 |ine: " 1| first g|
|00003380| 61 20 6e 6e 6d 6c 2d 70 | 6f 73 73 69 62 6c 79 2d |a nnml-p|ossibly-|
|00003390| 63 72 65 61 74 65 2d 64 | 69 72 65 63 74 6f 72 79 |create-d|irectory|
|000033a0| 20 6e 6e 6d 61 69 6c 2d | 67 72 6f 75 70 2d 70 61 | nnmail-|group-pa|
|000033b0| 74 68 6e 61 6d 65 20 6e | 6e 6d 6c 2d 64 69 72 65 |thname n|nml-dire|
|000033c0| 63 74 6f 72 79 20 69 6e | 74 2d 74 6f 2d 73 74 72 |ctory in|t-to-str|
|000033d0| 69 6e 67 20 66 69 6c 65 | 20 6e 6e 6d 61 69 6c 2d |ing file| nnmail-|
|000033e0| 63 72 6f 73 73 70 6f 73 | 74 2d 6c 69 6e 6b 2d 66 |crosspos|t-link-f|
|000033f0| 75 6e 63 74 69 6f 6e 20 | 74 20 77 72 69 74 65 2d |unction |t write-|
|00003400| 72 65 67 69 6f 6e 20 6e | 6e 68 65 61 64 65 72 2d |region n|nheader-|
|00003410| 62 65 2d 76 65 72 62 6f | 73 65 20 35 20 6e 6f 6d |be-verbo|se 5 nom|
|00003420| 65 73 67 20 6e 6e 6d 6c | 2d 70 61 72 73 65 2d 68 |esg nnml|-parse-h|
|00003430| 65 61 64 20 6e 6e 6d 6c | 2d 61 64 64 2d 6e 6f 76 |ead nnml|-add-nov|
|00003440| 5d 20 38 20 28 23 24 20 | 2e 20 31 32 37 32 30 29 |] 8 (#$ |. 12720)|
|00003450| 5d 29 0a 23 40 34 33 20 | 43 6f 6d 70 75 74 65 20 |]).#@43 |Compute |
|00003460| 74 68 65 20 6e 65 78 74 | 20 61 72 74 69 63 6c 65 |the next| article|
|00003470| 20 6e 75 6d 62 65 72 20 | 69 6e 20 47 52 4f 55 50 | number |in GROUP|
|00003480| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 6e 6e |...(defa|lias 'nn|
|00003490| 6d 6c 2d 61 63 74 69 76 | 65 2d 6e 75 6d 62 65 72 |ml-activ|e-number|
|000034a0| 20 23 5b 28 67 72 6f 75 | 70 29 20 22 c0 09 5c 6e | #[(grou|p) "..\n|
|000034b0| 5c 22 41 40 89 1b 84 3e | 00 c4 09 21 88 c5 09 21 |\"A@...>|...!...!|
|000034c0| 88 0e 06 84 21 00 c7 c8 | 0e 09 21 ca 5c 22 16 06 |....!...|..!.\"..|
|000034d0| 0e 06 83 34 00 0e 06 40 | 40 cb 0e 06 21 40 40 42 |...4...@|@...!@@B|
|000034e0| 82 37 00 cc cd 42 13 09 | 0b 44 5c 6e 42 12 0b 89 |.7...B..|.D\nB...|
|000034f0| 41 54 a1 88 ce cf 09 0e | 10 5c 22 d1 0b 41 21 50 |AT......|.\"..A!P|
|00003500| 21 83 5c 5c 00 0b 89 41 | 54 a1 88 82 44 00 0b 41 |!.\\...A|T...D..A|
|00003510| 29 87 22 20 5b 61 73 73 | 6f 63 20 67 72 6f 75 70 |)." [ass|oc group|
|00003520| 20 6e 6e 6d 6c 2d 67 72 | 6f 75 70 2d 61 6c 69 73 | nnml-gr|oup-alis|
|00003530| 74 20 61 63 74 69 76 65 | 20 6e 6e 6d 6c 2d 70 6f |t active| nnml-po|
|00003540| 73 73 69 62 6c 79 2d 63 | 72 65 61 74 65 2d 64 69 |ssibly-c|reate-di|
|00003550| 72 65 63 74 6f 72 79 20 | 6e 6e 6d 6c 2d 70 6f 73 |rectory |nnml-pos|
|00003560| 73 69 62 6c 79 2d 63 68 | 61 6e 67 65 2d 64 69 72 |sibly-ch|ange-dir|
|00003570| 65 63 74 6f 72 79 20 6e | 6e 6d 6c 2d 61 72 74 69 |ectory n|nml-arti|
|00003580| 63 6c 65 2d 66 69 6c 65 | 2d 61 6c 69 73 74 20 73 |cle-file|-alist s|
|00003590| 6f 72 74 20 6e 6e 68 65 | 61 64 65 72 2d 61 72 74 |ort nnhe|ader-art|
|000035a0| 69 63 6c 65 2d 74 6f 2d | 66 69 6c 65 2d 61 6c 69 |icle-to-|file-ali|
|000035b0| 73 74 20 6e 6e 6d 6c 2d | 63 75 72 72 65 6e 74 2d |st nnml-|current-|
|000035c0| 64 69 72 65 63 74 6f 72 | 79 20 23 5b 28 61 31 20 |director|y #[(a1 |
|000035d0| 61 32 29 20 22 08 40 09 | 40 57 87 22 20 5b 61 31 |a2) ".@.|@W." [a1|
|000035e0| 20 61 32 5d 20 32 5d 20 | 6c 61 73 74 20 31 20 30 | a2] 2] |last 1 0|
|000035f0| 20 66 69 6c 65 2d 65 78 | 69 73 74 73 2d 70 20 6e | file-ex|ists-p n|
|00003600| 6e 6d 61 69 6c 2d 67 72 | 6f 75 70 2d 70 61 74 68 |nmail-gr|oup-path|
|00003610| 6e 61 6d 65 20 6e 6e 6d | 6c 2d 64 69 72 65 63 74 |name nnm|l-direct|
|00003620| 6f 72 79 20 69 6e 74 2d | 74 6f 2d 73 74 72 69 6e |ory int-|to-strin|
|00003630| 67 5d 20 35 20 28 23 24 | 20 2e 20 31 33 34 30 30 |g] 5 (#$| . 13400|
|00003640| 29 5d 29 0a 23 40 33 36 | 20 41 64 64 20 61 20 6e |)]).#@36| Add a n|
|00003650| 6f 76 20 6c 69 6e 65 20 | 66 6f 72 20 74 68 65 20 |ov line |for the |
|00003660| 47 52 4f 55 50 20 62 61 | 73 65 2e 1f 0a 28 64 65 |GROUP ba|se...(de|
|00003670| 66 61 6c 69 61 73 20 27 | 6e 6e 6d 6c 2d 61 64 64 |falias '|nnml-add|
|00003680| 2d 6e 6f 76 20 23 5b 28 | 67 72 6f 75 70 20 61 72 |-nov #[(|group ar|
|00003690| 74 69 63 6c 65 20 68 65 | 61 64 65 72 73 29 20 22 |ticle he|aders) "|
|000036a0| 8a c0 09 21 71 88 64 62 | 88 5c 6e c3 5c 66 49 88 |...!q.db|.\n.\fI.|
|000036b0| c5 5c 6e 21 29 87 22 20 | 5b 6e 6e 6d 6c 2d 6f 70 |.\n!)." |[nnml-op|
|000036c0| 65 6e 2d 6e 6f 76 20 67 | 72 6f 75 70 20 68 65 61 |en-nov g|roup hea|
|000036d0| 64 65 72 73 20 30 20 61 | 72 74 69 63 6c 65 20 6e |ders 0 a|rticle n|
|000036e0| 6e 68 65 61 64 65 72 2d | 69 6e 73 65 72 74 2d 6e |nheader-|insert-n|
|000036f0| 6f 76 5d 20 33 20 28 23 | 24 20 2e 20 31 33 38 39 |ov] 3 (#|$ . 1389|
|00003700| 37 29 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |7)]).(de|falias '|
|00003710| 6e 6e 6d 6c 2d 68 65 61 | 64 65 72 2d 76 61 6c 75 |nnml-hea|der-valu|
|00003720| 65 20 23 5b 6e 69 6c 20 | 22 c0 95 c1 7f 88 60 7b |e #[nil |".....`{|
|00003730| 87 22 20 5b 30 20 6e 69 | 6c 5d 20 32 5d 29 0a 28 |." [0 ni|l] 2]).(|
|00003740| 70 75 74 20 28 71 75 6f | 74 65 20 6e 6e 6d 6c 2d |put (quo|te nnml-|
|00003750| 68 65 61 64 65 72 2d 76 | 61 6c 75 65 29 20 28 71 |header-v|alue) (q|
|00003760| 75 6f 74 65 20 62 79 74 | 65 2d 6f 70 74 69 6d 69 |uote byt|e-optimi|
|00003770| 7a 65 72 29 20 28 71 75 | 6f 74 65 20 62 79 74 65 |zer) (qu|ote byte|
|00003780| 2d 63 6f 6d 70 69 6c 65 | 2d 69 6e 6c 69 6e 65 2d |-compile|-inline-|
|00003790| 65 78 70 61 6e 64 29 29 | 0a 23 40 33 39 20 50 61 |expand))|.#@39 Pa|
|000037a0| 72 73 65 20 74 68 65 20 | 68 65 61 64 20 6f 66 20 |rse the |head of |
|000037b0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 62 75 66 66 |the curr|ent buff|
|000037c0| 65 72 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |er...(de|falias '|
|000037d0| 6e 6e 6d 6c 2d 70 61 72 | 73 65 2d 68 65 61 64 20 |nnml-par|se-head |
|000037e0| 23 5b 28 63 68 61 72 73 | 20 26 6f 70 74 69 6f 6e |#[(chars| &option|
|000037f0| 61 6c 20 6e 75 6d 62 65 | 72 29 20 22 8a 8c 65 62 |al numbe|r) "..eb|
|00003800| 88 60 c0 c1 c2 c3 23 86 | 0f 00 64 53 7d 88 65 62 |.`....#.|..dS}.eb|
|00003810| 88 c4 c5 c2 c3 23 83 26 | 00 c6 c7 c3 89 23 88 82 |.....#.&|.....#..|
|00003820| 15 00 c8 65 64 c9 ca 24 | 88 cb c3 21 89 1e 5c 66 |...ed..$|...!..\f|
|00003830| cd 0e 0e 49 88 0e 5c 66 | cf 0e 10 49 88 0e 5c 66 |...I..\f|...I..\f|
|00003840| 2b 87 22 20 5b 73 65 61 | 72 63 68 2d 66 6f 72 77 |+." [sea|rch-forw|
|00003850| 61 72 64 20 22 5c 6e 5c | 6e 22 20 6e 69 6c 20 74 |ard "\n\|n" nil t|
|00003860| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|00003870| 72 64 20 22 5c 5c 28 0d | 3f 5c 6e 5b 20 09 5d 2b |rd "\\(.|?\n[ .]+|
|00003880| 5c 5c 29 2b 22 20 72 65 | 70 6c 61 63 65 2d 6d 61 |\\)+" re|place-ma|
|00003890| 74 63 68 20 22 20 22 20 | 73 75 62 73 74 2d 63 68 |tch " " |subst-ch|
|000038a0| 61 72 2d 69 6e 2d 72 65 | 67 69 6f 6e 20 39 20 33 |ar-in-re|gion 9 3|
|000038b0| 32 20 6e 6e 68 65 61 64 | 65 72 2d 70 61 72 73 65 |2 nnhead|er-parse|
|000038c0| 2d 68 65 61 64 20 68 65 | 61 64 65 72 73 20 36 20 |-head he|aders 6 |
|000038d0| 63 68 61 72 73 20 30 20 | 6e 75 6d 62 65 72 5d 20 |chars 0 |number] |
|000038e0| 36 20 28 23 24 20 2e 20 | 31 34 32 33 38 29 5d 29 |6 (#$ . |14238)])|
|000038f0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6e 6e 6d 6c |.(defali|as 'nnml|
|00003900| 2d 6f 70 65 6e 2d 6e 6f | 76 20 23 5b 28 67 72 6f |-open-no|v #[(gro|
|00003910| 75 70 29 20 22 c0 09 5c | 6e 5c 22 41 86 27 00 c3 |up) "..\|n\"A.'..|
|00003920| c4 09 0d 5c 22 0e 06 50 | 21 1e 07 8a 0e 07 71 88 |...\"..P|!.....q.|
|00003930| c8 70 21 88 29 09 0e 07 | 42 5c 6e 42 12 0e 07 29 |.p!.)...|B\nB...)|
|00003940| 87 22 20 5b 61 73 73 6f | 63 20 67 72 6f 75 70 20 |." [asso|c group |
|00003950| 6e 6e 6d 6c 2d 6e 6f 76 | 2d 62 75 66 66 65 72 2d |nnml-nov|-buffer-|
|00003960| 61 6c 69 73 74 20 66 69 | 6e 64 2d 66 69 6c 65 2d |alist fi|nd-file-|
|00003970| 6e 6f 73 65 6c 65 63 74 | 20 6e 6e 6d 61 69 6c 2d |noselect| nnmail-|
|00003980| 67 72 6f 75 70 2d 70 61 | 74 68 6e 61 6d 65 20 6e |group-pa|thname n|
|00003990| 6e 6d 6c 2d 64 69 72 65 | 63 74 6f 72 79 20 6e 6e |nml-dire|ctory nn|
|000039a0| 6d 6c 2d 6e 6f 76 2d 66 | 69 6c 65 2d 6e 61 6d 65 |ml-nov-f|ile-name|
|000039b0| 20 62 75 66 66 65 72 20 | 62 75 66 66 65 72 2d 64 | buffer |buffer-d|
|000039c0| 69 73 61 62 6c 65 2d 75 | 6e 64 6f 5d 20 34 5d 29 |isable-u|ndo] 4])|
|000039d0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6e 6e 6d 6c |.(defali|as 'nnml|
|000039e0| 2d 73 61 76 65 2d 6e 6f | 76 20 23 5b 6e 69 6c 20 |-save-no|v #[nil |
|000039f0| 22 8a 08 85 30 00 c1 08 | 40 41 21 83 28 00 08 40 |"...0...|@A!.(..@|
|00003a00| 41 71 88 c2 20 83 20 00 | c3 c4 64 c5 20 c6 c7 25 |Aq.. . .|..d. ..%|
|00003a10| 88 c8 c6 21 88 c9 70 21 | 88 08 41 89 10 84 05 00 |...!..p!|..A.....|
|00003a20| c6 29 87 22 20 5b 6e 6e | 6d 6c 2d 6e 6f 76 2d 62 |.)." [nn|ml-nov-b|
|00003a30| 75 66 66 65 72 2d 61 6c | 69 73 74 20 62 75 66 66 |uffer-al|ist buff|
|00003a40| 65 72 2d 6e 61 6d 65 20 | 62 75 66 66 65 72 2d 6d |er-name |buffer-m|
|00003a50| 6f 64 69 66 69 65 64 2d | 70 20 77 72 69 74 65 2d |odified-|p write-|
|00003a60| 72 65 67 69 6f 6e 20 31 | 20 62 75 66 66 65 72 2d |region 1| buffer-|
|00003a70| 66 69 6c 65 2d 6e 61 6d | 65 20 6e 69 6c 20 6e 6f |file-nam|e nil no|
|00003a80| 6d 65 73 67 20 73 65 74 | 2d 62 75 66 66 65 72 2d |mesg set|-buffer-|
|00003a90| 6d 6f 64 69 66 69 65 64 | 2d 70 20 6b 69 6c 6c 2d |modified|-p kill-|
|00003aa0| 62 75 66 66 65 72 5d 20 | 37 5d 29 0a 23 40 34 39 |buffer] |7]).#@49|
|00003ab0| 20 47 65 6e 65 72 61 74 | 65 20 6e 6f 76 20 64 61 | Generat|e nov da|
|00003ac0| 74 61 62 61 73 65 73 20 | 69 6e 20 61 6c 6c 20 6e |tabases |in all n|
|00003ad0| 6e 6d 6c 20 64 69 72 65 | 63 74 6f 72 69 65 73 2e |nml dire|ctories.|
|00003ae0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 6d |..(defal|ias 'nnm|
|00003af0| 6c 2d 67 65 6e 65 72 61 | 74 65 2d 6e 6f 76 2d 64 |l-genera|te-nov-d|
|00003b00| 61 74 61 62 61 73 65 73 | 20 23 5b 6e 69 6c 20 22 |atabases| #[nil "|
|00003b10| c0 c1 21 88 c2 c3 c1 21 | 86 5c 66 00 c4 21 88 c5 |..!....!|.\f..!..|
|00003b20| 0e 06 21 16 06 c7 0e 06 | 21 88 c8 0e 09 0e 5c 6e |..!.....|!.....\n|
|00003b30| 5c 22 87 22 20 5b 6e 6e | 6d 61 69 6c 2d 61 63 74 |\"." [nn|mail-act|
|00003b40| 69 76 61 74 65 20 6e 6e | 6d 6c 20 6e 6e 6d 6c 2d |ivate nn|ml nnml-|
|00003b50| 6f 70 65 6e 2d 73 65 72 | 76 65 72 20 6e 6e 6f 6f |open-ser|ver nnoo|
|00003b60| 2d 63 75 72 72 65 6e 74 | 2d 73 65 72 76 65 72 20 |-current|-server |
|00003b70| 22 22 20 65 78 70 61 6e | 64 2d 66 69 6c 65 2d 6e |"" expan|d-file-n|
|00003b80| 61 6d 65 20 6e 6e 6d 6c | 2d 64 69 72 65 63 74 6f |ame nnml|-directo|
|00003b90| 72 79 20 6e 6e 6d 6c 2d | 67 65 6e 65 72 61 74 65 |ry nnml-|generate|
|00003ba0| 2d 6e 6f 76 2d 64 61 74 | 61 62 61 73 65 73 2d 31 |-nov-dat|abases-1|
|00003bb0| 20 6e 6e 6d 61 69 6c 2d | 73 61 76 65 2d 61 63 74 | nnmail-|save-act|
|00003bc0| 69 76 65 20 6e 6e 6d 6c | 2d 67 72 6f 75 70 2d 61 |ive nnml|-group-a|
|00003bd0| 6c 69 73 74 20 6e 6e 6d | 6c 2d 61 63 74 69 76 65 |list nnm|l-active|
|00003be0| 2d 66 69 6c 65 5d 20 33 | 20 28 23 24 20 2e 20 31 |-file] 3| (#$ . 1|
|00003bf0| 35 30 32 35 29 20 6e 69 | 6c 5d 29 0a 28 64 65 66 |5025) ni|l]).(def|
|00003c00| 61 6c 69 61 73 20 27 6e | 6e 6d 6c 2d 67 65 6e 65 |alias 'n|nml-gene|
|00003c10| 72 61 74 65 2d 6e 6f 76 | 2d 64 61 74 61 62 61 73 |rate-nov|-databas|
|00003c20| 65 73 2d 31 20 23 5b 28 | 64 69 72 29 20 22 c0 09 |es-1 #[(|dir) "..|
|00003c30| 21 11 c2 09 c3 c4 c3 24 | c4 19 1d 0d 83 2c 00 0d |!......$|.....,..|
|00003c40| 89 41 15 40 11 c6 09 21 | c7 9d 84 0d 00 c8 09 21 |.A.@...!|.......!|
|00003c50| 83 0d 00 c9 09 21 88 82 | 0d 00 2a ca cb cc c2 09 |.....!..|..*.....|
|00003c60| c4 cd c3 24 5c 22 ce 5c | 22 89 1e 0f 85 49 00 0e |...$\".\|"....I..|
|00003c70| 10 09 21 88 d1 09 0e 0f | 5c 22 29 87 22 20 5b 66 |..!.....|\")." [f|
|00003c80| 69 6c 65 2d 6e 61 6d 65 | 2d 61 73 2d 64 69 72 65 |ile-name|-as-dire|
|00003c90| 63 74 6f 72 79 20 64 69 | 72 20 64 69 72 65 63 74 |ctory di|r direct|
|00003ca0| 6f 72 79 2d 66 69 6c 65 | 73 20 74 20 6e 69 6c 20 |ory-file|s t nil |
|00003cb0| 64 69 72 73 20 66 69 6c | 65 2d 6e 61 6d 65 2d 6e |dirs fil|e-name-n|
|00003cc0| 6f 6e 64 69 72 65 63 74 | 6f 72 79 20 28 22 2e 22 |ondirect|ory ("."|
|00003cd0| 20 22 2e 2e 22 29 20 66 | 69 6c 65 2d 64 69 72 65 | "..") f|ile-dire|
|00003ce0| 63 74 6f 72 79 2d 70 20 | 6e 6e 6d 6c 2d 67 65 6e |ctory-p |nnml-gen|
|00003cf0| 65 72 61 74 65 2d 6e 6f | 76 2d 64 61 74 61 62 61 |erate-no|v-databa|
|00003d00| 73 65 73 2d 31 20 73 6f | 72 74 20 6d 61 70 63 61 |ses-1 so|rt mapca|
|00003d10| 72 20 23 5b 28 6e 61 6d | 65 29 20 22 c0 09 21 87 |r #[(nam|e) "..!.|
|00003d20| 22 20 5b 73 74 72 69 6e | 67 2d 74 6f 2d 69 6e 74 |" [strin|g-to-int|
|00003d30| 20 6e 61 6d 65 5d 20 32 | 5d 20 22 5e 5b 30 2d 39 | name] 2|] "^[0-9|
|00003d40| 5d 2b 24 22 20 3c 20 66 | 69 6c 65 73 20 6e 6e 6d |]+$" < f|iles nnm|
|00003d50| 6c 2d 67 65 6e 65 72 61 | 74 65 2d 61 63 74 69 76 |l-genera|te-activ|
|00003d60| 65 2d 66 75 6e 63 74 69 | 6f 6e 20 6e 6e 6d 6c 2d |e-functi|on nnml-|
|00003d70| 67 65 6e 65 72 61 74 65 | 2d 6e 6f 76 2d 66 69 6c |generate|-nov-fil|
|00003d80| 65 5d 20 39 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 |e] 9]).(|byte-cod|
|00003d90| 65 20 22 c0 09 42 11 c0 | 87 22 20 5b 66 69 6c 65 |e "..B..|." [file|
|00003da0| 73 20 63 75 72 72 65 6e | 74 2d 6c 6f 61 64 2d 6c |s curren|t-load-l|
|00003db0| 69 73 74 5d 20 32 29 0a | 28 64 65 66 61 6c 69 61 |ist] 2).|(defalia|
|00003dc0| 73 20 27 6e 6e 6d 6c 2d | 67 65 6e 65 72 61 74 65 |s 'nnml-|generate|
|00003dd0| 2d 61 63 74 69 76 65 2d | 69 6e 66 6f 20 23 5b 28 |-active-|info #[(|
|00003de0| 64 69 72 29 20 22 c0 c1 | 5c 6e 21 0b 5c 22 1c c5 |dir) "..|\n!.\"..|
|00003df0| c6 5c 66 0e 07 5c 22 0e | 07 5c 22 16 07 5c 66 0e |.\f..\".|.\"..\f.|
|00003e00| 08 40 0e 08 89 1e 09 41 | 83 28 00 0e 09 41 89 16 |.@.....A|.(...A..|
|00003e10| 09 82 1b 00 0e 09 40 29 | 42 44 0e 07 42 89 16 07 |......@)|BD..B...|
|00003e20| 29 87 22 20 5b 6e 6e 68 | 65 61 64 65 72 2d 66 69 |)." [nnh|eader-fi|
|00003e30| 6c 65 2d 74 6f 2d 67 72 | 6f 75 70 20 64 69 72 65 |le-to-gr|oup dire|
|00003e40| 63 74 6f 72 79 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |ctory-fi|le-name |
|00003e50| 64 69 72 20 6e 6e 6d 6c | 2d 64 69 72 65 63 74 6f |dir nnml|-directo|
|00003e60| 72 79 20 67 72 6f 75 70 | 20 64 65 6c 71 20 61 73 |ry group| delq as|
|00003e70| 73 6f 63 20 6e 6e 6d 6c | 2d 67 72 6f 75 70 2d 61 |soc nnml|-group-a|
|00003e80| 6c 69 73 74 20 66 69 6c | 65 73 20 66 5d 20 35 5d |list fil|es f] 5]|
|00003e90| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6e 6e 6d |).(defal|ias 'nnm|
|00003ea0| 6c 2d 67 65 6e 65 72 61 | 74 65 2d 6e 6f 76 2d 66 |l-genera|te-nov-f|
|00003eb0| 69 6c 65 20 23 5b 28 64 | 69 72 20 66 69 6c 65 73 |ile #[(d|ir files|
|00003ec0| 29 20 22 c0 09 21 89 19 | 5c 6e 50 1b c4 c5 21 1e |) "..!..|\nP...!.|
|00003ed0| 06 c7 1e 08 c7 1e 09 c7 | 1e 5c 6e c7 1e 0b 8a 0e |........|.\n.....|
|00003ee0| 06 71 88 cc 70 21 88 cd | 20 88 0e 0e 71 88 cf 0b |.q..p!..| ...q...|
|00003ef0| 21 83 34 00 0e 10 0b 21 | 88 0e 11 83 95 00 d2 09 |!.4....!|........|
|00003f00| d3 0e 11 40 21 50 89 16 | 5c 6e 21 84 8c 00 cd 20 |...@!P..|\n!.... |
|00003f10| 88 d4 0e 5c 6e 21 88 65 | 62 d5 d6 c7 d7 23 88 64 |...\n!.e|b....#.d|
|00003f20| 60 5a 16 09 d8 60 53 5d | 7d 88 0e 09 d9 55 84 8a |`Z...`S]|}....U..|
|00003f30| 00 65 64 55 84 8a 00 65 | 62 88 da 0e 09 0e 11 40 |.edU...e|b......@|
|00003f40| 5c 22 16 0b 8a 0e 06 71 | 88 64 62 88 db 0e 0b 21 |\".....q|.db....!|
|00003f50| 88 29 7e 88 0e 11 41 89 | 16 11 84 39 00 8a 0e 06 |.)~...A.|...9....|
|00003f60| 71 88 dc d8 64 dd 0b 21 | c7 de 25 88 df 70 21 2e |q...d..!|..%..p!.|
|00003f70| 09 87 22 20 5b 66 69 6c | 65 2d 6e 61 6d 65 2d 61 |.." [fil|e-name-a|
|00003f80| 73 2d 64 69 72 65 63 74 | 6f 72 79 20 64 69 72 20 |s-direct|ory dir |
|00003f90| 6e 6e 6d 6c 2d 6e 6f 76 | 2d 66 69 6c 65 2d 6e 61 |nnml-nov|-file-na|
|00003fa0| 6d 65 20 6e 6f 76 20 67 | 65 74 2d 62 75 66 66 65 |me nov g|et-buffe|
|00003fb0| 72 2d 63 72 65 61 74 65 | 20 22 20 2a 6e 6f 76 2a |r-create| " *nov*|
|00003fc0| 22 20 6e 6f 76 2d 62 75 | 66 66 65 72 20 6e 69 6c |" nov-bu|ffer nil|
|00003fd0| 20 6e 6f 76 2d 6c 69 6e | 65 20 63 68 61 72 73 20 | nov-lin|e chars |
|00003fe0| 66 69 6c 65 20 68 65 61 | 64 65 72 73 20 62 75 66 |file hea|ders buf|
|00003ff0| 66 65 72 2d 64 69 73 61 | 62 6c 65 2d 75 6e 64 6f |fer-disa|ble-undo|
|00004000| 20 65 72 61 73 65 2d 62 | 75 66 66 65 72 20 6e 6e | erase-b|uffer nn|
|00004010| 74 70 2d 73 65 72 76 65 | 72 2d 62 75 66 66 65 72 |tp-serve|r-buffer|
|00004020| 20 66 69 6c 65 2d 65 78 | 69 73 74 73 2d 70 20 6e | file-ex|ists-p n|
|00004030| 6e 6d 61 69 6c 2d 64 65 | 6c 65 74 65 2d 66 69 6c |nmail-de|lete-fil|
|00004040| 65 2d 66 75 6e 63 74 69 | 6f 6e 20 66 69 6c 65 73 |e-functi|on files|
|00004050| 20 66 69 6c 65 2d 64 69 | 72 65 63 74 6f 72 79 2d | file-di|rectory-|
|00004060| 70 20 69 6e 74 2d 74 6f | 2d 73 74 72 69 6e 67 20 |p int-to|-string |
|00004070| 69 6e 73 65 72 74 2d 66 | 69 6c 65 2d 63 6f 6e 74 |insert-f|ile-cont|
|00004080| 65 6e 74 73 20 73 65 61 | 72 63 68 2d 66 6f 72 77 |ents sea|rch-forw|
|00004090| 61 72 64 20 22 5c 6e 5c | 6e 22 20 74 20 31 20 30 |ard "\n\|n" t 1 0|
|000040a0| 20 6e 6e 6d 6c 2d 70 61 | 72 73 65 2d 68 65 61 64 | nnml-pa|rse-head|
|000040b0| 20 6e 6e 68 65 61 64 65 | 72 2d 69 6e 73 65 72 74 | nnheade|r-insert|
|000040c0| 2d 6e 6f 76 20 77 72 69 | 74 65 2d 72 65 67 69 6f |-nov wri|te-regio|
|000040d0| 6e 20 65 78 70 61 6e 64 | 2d 66 69 6c 65 2d 6e 61 |n expand|-file-na|
|000040e0| 6d 65 20 6e 6f 6d 65 73 | 67 20 6b 69 6c 6c 2d 62 |me nomes|g kill-b|
|000040f0| 75 66 66 65 72 5d 20 37 | 5d 29 0a 28 64 65 66 61 |uffer] 7|]).(defa|
|00004100| 6c 69 61 73 20 27 6e 6e | 6d 6c 2d 6e 6f 76 2d 64 |lias 'nn|ml-nov-d|
|00004110| 65 6c 65 74 65 2d 61 72 | 74 69 63 6c 65 20 23 5b |elete-ar|ticle #[|
|00004120| 28 67 72 6f 75 70 20 61 | 72 74 69 63 6c 65 29 20 |(group a|rticle) |
|00004130| 22 8a c0 09 21 71 88 65 | 62 88 c2 c3 c4 0d 21 c6 |"...!q.e|b.....!.|
|00004140| 51 c7 c8 23 83 1e 00 c9 | 94 ca 79 88 60 7c 88 29 |Q..#....|..y.`|.)|
|00004150| c8 87 22 20 5b 6e 6e 6d | 6c 2d 6f 70 65 6e 2d 6e |.." [nnm|l-open-n|
|00004160| 6f 76 20 67 72 6f 75 70 | 20 72 65 2d 73 65 61 72 |ov group| re-sear|
|00004170| 63 68 2d 66 6f 72 77 61 | 72 64 20 22 5e 22 20 69 |ch-forwa|rd "^" i|
|00004180| 6e 74 2d 74 6f 2d 73 74 | 72 69 6e 67 20 61 72 74 |nt-to-st|ring art|
|00004190| 69 63 6c 65 20 22 09 22 | 20 6e 69 6c 20 74 20 30 |icle "."| nil t 0|
|000041a0| 20 31 5d 20 34 5d 29 0a | 28 70 72 6f 76 69 64 65 | 1] 4]).|(provide|
|000041b0| 20 28 71 75 6f 74 65 20 | 6e 6e 6d 6c 29 29 0a    | (quote |nnml)). |
+--------+-------------------------+-------------------------+--------+--------+